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CZQNADO DEQNA FUNCTIONAL TEST 


Bi 


MODULE ZQNA1 (STITLE ‘CZQNADO DEQNA FUNCTIONAL TEST' 


sSBTTL 


BEGIN 
6( 


IDENT = ‘VO1.0', 

ADDRESSING NG_MODE( ABSOLUTE), 

LANGUAGE(BLISS16)) = 
MODULE: 


‘GLOBAL DEFINITION 


IDENTIFICATION 


PRODUCT CODE: AC-1T614D-MC 

PRODUCT NAME: CZQNADO DEQNA FUNCTIONAL TEST 
PRODUCT DATE: MARCH 14, 1985 

MAINTAINER: MSD DIAGNOSTIC ENGINEERING 
AUTHOR : S. MAZURCZYK 


COPYRIGHT (C) 1984,1985 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A SINGLE 
COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE INCLUSION OF THE 
ABOVE COPYRIGHT NOTICE. THIS SOFTWARE, OR ANY OTHER COPIES THEREOF, 
MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON 
EXCEPT FOR USE ON SUCH SYSTEH AND TO ONE WHO AGREES TO THESE LICENSE 
TERMS. TITLE TO AND OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES 


REMAIN IN DEC. 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
oan cn NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC. 


THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 


DIGITAL POP UNIBUS MASSBUS 
DEC DECUS DECTAPE 
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C 0050 1 
¢ 0051 1 
C 0052 1 
C 0053 1 
C 0054 1 
C 0055 1 { 
Cc 0056 1 TABLE OF CONTENTS 
C 0057 1 Tt ittiiitiitititt | 
c 0058 i 
c 0059 1 
C 0060 1 1.0 GENERAL INFORMATION 
C 0061 1 Rox PROGRAM ABSTRACT 
C 0062 1 1.2 SYSTEM REQUIREMENTS 
C 0063 1 ..- RELATED DOCUMENTS AND STANDARDS 
C 0064 1 1.4 ONS 
C 0065 1 
C 0066 1 2.0 
C 0067 1 2.1 
C 0068 1 2.2 SWITCHES 
C 0069 1 2.3 FL 
C¢ 0070 1 2.4 HARDWARE QUESTIONS 
€ 0071 1 2.5 SOFTWARE QUESTIONS 
: ped. : 2.6 QUICK STARTUP PROCEDURE 
C 0074 1 3.0 ERROR INFORMATION 
C 0075 1 
C 0076 1 4.0 TEST SUMMARIES 
C 0077 i 
C 0078 1 5.0 MAINTENANCE HISTORY 
C¢ 0079 1 


ASSUMPTI 

OPERATING INSTRUCTIONS 

COMMANDS 
} 
| 
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; C 0080 1 1.0 GENERAL INFORMATION 

; C 0081 2 = wm mn ernnennncncn- 

; C 0082 1 

; C 0083 1 

; C 0084 1 1.1 PROGRAM ABSTRACT 

>; € 0085 1 = mmm me nee eceecnee 

; C 0086 1 

; C 0087 1 The DIGITAL ETHERNET Q-Bus Network Adapter (DEQNA) Field Functional 

; C 0088 1 Diagnostic Program (ZQNA) performs extensive functional testing of 

; C 0089 1 the DEQNA/M7504 module for Q18 or Q22-Bus based PDP-11 systems. ZQNA 

; € 0090 1 program attempts to isolate faults to the following Field Replecable 

; C 0091 1 Units CFRU's): DEQNA, bulkhead assembly, trensceiver cable, circuit 

; C 0092 1 breaker ( fuse in bulkhead assembly ) and transceiver. This software 

; C 0093 1 also attempts to localize faults to the functional sreas of the DEQNA 

; C 0094 1 module. 

; € 0095 1 

; C 0096 1 A test operator controls testing of the module from a console 

; C 0097 1 € hard copy or CRT ) 

; C 0098 1 

; C 0099 1 This diagnostic has been written for use with the diagnostic 

; € 0100 1 runtime services software (supervisor). These services provide 

; € 0101 1 the interface to the operator and to the software environment. 

; € 0102 1 For ea complete description of the runtime services, refer to the 

; € 0103 1 XXDP+ user's manual. There is a brief description of the runtime 

; € 0104 1 services in section 2 of this document. 

; € 0105 1 

; C 0106 1 

; € 0107 1 1.2 SYSTEM REQUIREMENTS 

sC 0108 1 j= = sees eecccescceene- 

; € 0109 1 . 

; € 0110 1 The ZQNA software operates on a typical ‘newer PDP-11 processor’ system 

; C O111 1 that has one or two DEQNA modules on the Q18 or Q22 system bus. 

: C Oll2 1 The internal and internal/extended loopback mode tests do not . 

; C0113 1 require the transceiver or the loopback connector to be unplugged. 

; € 0114 1 The external loopback mode may be used with a terminated transceiver 

; € 0115 1 that has no network cable attached. 

; € 0116 1 

; C 0117 1 Testing DEQNA module and its interface to the Ethernet requires 

; C 0118 1 following hardware: 

+ € 0119 1 

; ©€ 0120 1 - Typical system ( PDP-11/23 Plus, ORION ) with Q-Bus, 

; C€ 0121 1 - DEQNA module, 

; C Ol22 1 - Minimum of 28K words of memory ( supporting block or non-block mode ), 

; C 0123 1 - Console terminal, 

; € 0124 #1 - Loopback connector ( male loopback connector, Part # 12 221 96-01 ), 

; C 0125 1 - Bulkhead essembly, 

; € 0126 1 - Transceiver cable, 

; C 0127 1 - and transceiver ( H4000 ). 

; € 0128 #1 
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vo1.0 GLOBAL DEFINITION MODULE 14-Mar-1985 13:07:35 DISK sJSER2: (MARSHALL .DEQNA)ZQNA1.BLI;4 (4) 
; C 0129 1 1.3 RELATED DOCUMENTS AND STANDARDS 
; € 0130 2 — = wm mmm mem nem ewe eee e ee eeenn= 
s € G@imk 2 
; © 0132 1 XDP+ Supervisor/User's Manual - ( CHQUS ). 

; € 0133 1 

; € 0134 1 

; € 0135 1 1.4 ASSUMPTIONS 

+ C0136 1 = weeeeecerec- 

; € 0137 1 

; € 0138 1 It is essumed thet the system has been tested without DEQNA and found 
7 © 0139 1 working before this yy is run, or that DEQNA DEC/X11 

; : ater ; Exerciser hes dropped DEQNA option module when running system test. 

$ 

; € 0142 1 

; €C 0143 1 2.0 OPERATING INSTRUCTIONS 

+ C 01446 JY mene n ene eennn- 

; € 0145 1 

; € 0146 1 This section conteins ea brief description of the runtime services. 

; —: : for detailed information, refer to the XXDP+ User's Manuel (CHQUS). 

$ 

; € 0149 1 

; € 0150 1 2.1 COMMANDS 

i eee ee ke | See 

; C 0152 1 

; € 0153 1 There are eleven legal commands for the diagnostic runtime services 
; € 0154 1 (supervisor). This section lists the commands end gives a very 
; : oo : brief description of them. The XXDP+ User's Manuel has more details. 
; 

; € 0157 1 COMMAND EFFECT 

; C0358 1 i — semrrne= emer eeeenee ree eesecenconccce 

; C 0159 1 

; € 0160 1 START Start the diagnostic from an initial state 

; € 0161 1 RESTART Start the diagnostic without initializi 

; C 0162 1 CONTINUE Continue et test that was interrupted i tC) 
; C 0163 1 PROCEED Continue from an error helt 

; C 0164 1 EXIT Return to XXDP+ monitor (XXDP+ operation only!) 
; C 0165 1 ADD Activate a unit for testing (all units are 

; C 0166 1 considered to be active at start time 

; C 0167 1 DROP Deactivate e unit 

; © 0168 1 PRINT Print statisticel information Cif implemented 
; € 0169 1 by the diagnostic - section 4.0) 

; € 0170 1 DISPLAY — a list of all device information 

; € 0171 1 FLAGS cyee the state of ell fl (see section 2.3) 
: 3 pop : ZFLAGS Cleer all flags (see section 2.3) 

; 

; € 0174 1 A command can be recognized by the first three cherecters. 

; € 0175 1 So you may, for exemple, type “STA” instead of “START”. 
' 
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SEQ 000 
I, Al CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 * ag 5! 
V GLOBAL DEFINITION MODULE 14-Mar-1985 13:07:35 DISK$USER2: (MARSHALL .DEQNAJZQNA1.BLI;4 (5) /| 
0176 2.2 SWITCHES 
ale, 4.8 | —-—aaee 
0178 
0179 There ere several switches which ere used to modify supervisor 
0180 operation. These switches ere appended to the legal c , 
0181 All of the legal switches ere tabulated below with e brief 
0182 description of each. In the descriptions below, e decimal number 
0183 is designated by “DDDDD". 
0184 
0185 SWITCH EFFECT 
0186 2 — mmr em ewe neem ween en emnnnnn 
0187 
0188 /TESTS:LIST Execute only those tests specified in 
0189 the list. List is a stri of test 
0190 numbers, for exemple - /TESTS:1:5:7-10. 
0191 This list will cause tests 1,5,7,8,9,10 to 
0192 be run. All other tests will not be run. 
0193 /PASS :DDD00D Execute DDDDD pesses (DDDDD = 1 to 64000) 
/FLAGS:FLGS Set specified flags. flags are described 
0195 in section 2.3. 
/EOP :DDDDD Report end of pass neneoee after every 
0197 DDDDD 


passes gt ¢ 

/UNITS:LIST TEST/ADD/DROP only those units specified 
in the list. List example - /UNITS:0:5:10-12 
use units 0,5,10,11,12 Cunit numbers = 0-63) 


Example of switch usage: 
START/TESTS:1-5/PASS: 1000/E0P: 100 
The effect of this command will be: 


1. Tests 1 thr 5 will be executed. 

2. All units will be tested 1000 times. 

3. The end of pess messages will be 
printed after each 100 passes only. 


A Switch can be recognized by the first three characters. You 
may, for exemple, type “/TES:1-5" instead of “/TESTS:1-5”". 
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SEQ 0006 
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/V01.0 GLOBAL DEFINITION MODULE 14-Mer-1985 13:07:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA1.BL1;4 (6) 
; C 0216 1 Below is e table that specifies which switches can be used by 

; € 0217 1 each command. 

; C 0218 1 

; € 0219 1 TESTS PASS FLAGS EOP UNITS 

CC 0220 2 = wm mmm mmm nner ene none nee e nen enecenn- 

; C 0221 1 START x x x me x 

; C O222 1 RESTART xX x x x x 

3s C 0223 1 x x“ x 

; C 0224 1 PROCEED x 

s C 0225 1 DROP x 

; C 0226 1 x 

; C 0227 1 PRINT 

; C 0228 1 DISPLAY x 

; C 0229 1 FLAGS 

; C 0230 1 ZFLAGS 

; C 0231 1 
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vo1.0 GLOBAL DEFINITION MODULE 14-Mar-1985 13:07:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA1.BLI;4 (7)! 

; C 0232 1 2.3 FLAGS 

F eae eee 

; C 02 1 

; C 0235 1 Flags ere used to set up certain operational peremeters such as 

; C 0236 1 looping on error. All flags ere cleared at startup and remain 

; C 0237 1 cleared until explicitly set using the flags switch. Flags | 

; C 0238 1 ere also cleared after ea start command unless set using the 

; C 0239 1 “ee, switch. The ZFLAGS command may also be used to clear 

; € 0240 1 ell flegs. with the exception of the START end ZFLAGS commands, 

; C 0241 1 No ¢ affect the state of the flags; they remain set or i 

; pee : cleared as specified by the last flag switch. | 

‘ 

; C 0244 1 FLAG EFFECT 

; € 0245 1 mH eee ee ee nn nen ne nnnee 

; C 0246 1 

; C 0247 1 HOE Halt on error - control is returned to 

; C 0248 1 runtime services command mode 

; C 0249 1 LOE Loop on error 

; C 0250 1 IER* Inhibit ell error reports 

s ©C Gai i IBR* Inhibit all error reports except first 

; C 0252 1 level (first level conteins error type, 

; C 0253 1 number, PC, test and unit) 

; C 02 1 IXR* Inhibit extended error reports (those 

; C 0255 1 called by PRINTX macro's) 

; C 0256 1 PRI Direct messages to line printer 

s © Gao? i PNT Print test number as test executes - 

; C 0258 1 BOE “BELL” on error 

; C 0259 1 UAM Unattended mode (no manual intervention) 

; C 0260 1 ISR Inhibit statistical reports (does not apply 

; C 0261 1 to diagnostics which do not support statis- 

; C 0262 1 tical reporting) 

; C 0263 1 IDR Inhibit program dropping of units 

; C 0264 1 ADR Execute autodrop code 

; C 0265 1 LOT Loop on test 

; C 0266 1 EVL Execute evaluation Con diagnostics which 

; C 0267 1 have evaluation support) 

; C 0268 1 

; C 0269 1 *error messages ere described in section 3.0 

; € 0270 1 

; C 0271 1 See the XXDP+ User's Manual for more details on flegs. You may 

; C 0272 1 specify more than one flag with the flag switch. For example, 

; C 0273 1 to cause the program to loop on error, inhibit error reports 

: 3 asrs : and type e "BELL” on error, you may use the following string: 

; 

; C 0276 1 /FLAGS: LOE: IER: BOE 

j 
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2.4 HARDWARE QUESTIONS 


~~ rae eee eee eee ese ee = |S 


— wee 


When ea diagnostic is started, the DRS prompts the user for herdware 
information by displaying : 


“CHANGE HW (L) ?” 


you must enswer “Y" efter e start commend unless the hardware 
information has been “preloaded” using the Setup Utility (see chapter 
6 of the XXDP+ User's Manuel). When you answer this question with a 
"Y", the DRS asks for the number of units. You will then be asked the 
following questions for each unit. 


# OF DEVICES (D) ? 


Answer with the number of units to be tested (no default). This answer 
will determine how many times the following questions are asked. 
One (1) device must be specified. 


| 
| 
| 
DEQNA I/0 PAGE ADR (0) 174440 ? 
Answer with the address of the I/0 page register assigned for one 
of the DEQNA devices. The I/0 page eddresses permited are: 174440 
end 174460. 
INTERRUPT VECTOR ADR (0) 700 ? 
Answer with the interrupt vector address of the DEQNA module. 

| 


Interrupt vector address for device st I/0 pege address 174440 is 700 
oct. and that for I/0 page address of 174460 is 704 oct. 
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EXTERNAL LOOPBACK MODE (L)? 


Answer with “Y" if you went to execute include "TEST 7" in the test 
sequence. “TEST 7” is the only test that uses external loopback mode. 
"N” inhibits execution of "TEST 7”. 


SYSTEM HAS BLOCK-MODE MEMORY (L)? 


Answer with "“Y" if the system has block-mode memory and "N” if 
it has non block-mode memory. | 


IS LOOPBACK CONNECTOR IN DEQNA (L)? 


Answer with "Y" if loopback connector is in the back of the DEQNA 
module. 


: ZQNA1 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 — ——y 9 - 
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} 
; € 0310 1 2.5 SOFTWARE QUESTIONS 
s € O311 2 = wee mene neneccee= 
; C 0312 1 
; C 0313 1 After you have answered the hardware questions or after a RESTART or 
; C 0314 1 CONTINUE command, the ORS asks for software parameters. These 
; C 0315 1 peremeters govern some diagnostic specific operation modes. You will ; 
s C 0316 1 be prompted by 
; € 0317 1 7 
; € 03168 1 CHANGE SW (L) ?- 
: C 0319 1 i 
3; C€ 0320 1 if you wish to change any parameters, answer by typing "Y". The 
; C 0321 1 software questions and the default values ere described in the next 
; C 0322 1 peragraph(s). ' 
; € 0323 1 
; 3 poe : DO YOU WANT TO TEST SANITY TIMER (L)? 
; 
; C 0326 1 If you wish to test the Sanity Timer logic, answer by typing "Y”. 
; C 0327 1 Whenever this question is answered with ea "Y" following question 
; € 0328 1 will follow: 
; C 0329 1 
: : oahe ; SANITY TIMER TIMEOUT VALUE (0)? 
3 ‘ 
; € 0332 1 Answer with the TIMEOUT VALUE bei e decimal number between O and 7. 
; one : Use table below to select desired TIMEOUT VALUE. 
; 
; C 0335 1 TIMEOUT VALUE TIMEOUT PERIOD IN SEC. 
; €C 0336 32  —— emer ene rr en (teen emer enn e ween ne- 
; C 0337 1 
s € OS58 i 0 1/4 
; C 0339 1 i i 
; € 0340 1 2 4 
; C 0341 1 3 16 
; C 0342 1 4 60 
; C 0343 1 5 240 
+; C 0344 1 6 960 
; € 0345 1 7 3840 
3 C i 
; C 1 
s C 1 
; C 1 
; C 1 
; C 1 
3 C 1 
3 & 1 
3 C 1 
5 & 1 
; C 1 
3; C 1 
3 C 1 
»& 1 
;£ 1 
; C 1 
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2.6 QUICK START-UP PROCEDURE (XXDP-+) 
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To start-up this program: 
© Boot XXDP-+ 
o Give the date 


o Type “R Neme”, where Name is the name of the BIN file for 
this program 


Type “START” 

Answer the “CHANGE HW" question with "Y" 
Answer all the hardware questions 
Answer the “CHANGE SW” question with "“Y" 


2 eS © 


Answer all the software questions 


When you follow this procedure you will be using only the defaults for 
liens and softwere peremeters. These defaults are described in the 
previous sections. 
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3.0 ERROR INFORMATION 


There ere three levels of error messeges thet may be issued by 

a a general, besic and extended. Generel error messages 
ere elways printed unless the IBE and/or IER flag is set. The general 
error message is of the form: 


NAME ER_TYPE ER_NO UNIT_NO TEST_NO PC_ADDR 


-where; 
NAME = Di tic neme 
ER_TYPE = Error type ( ell errors are HARD ) 
ER_NO = Error number 
UNIT_NO = O 
TEST_NO = Test and subtest where error occurred 
PC_ADDR = Progrem Counter contents 


Besic error messages ere messages that contain some additional 
information ebout the error. These ere elways printed unless one or 
more of the DRS error fleg(s) ( IBE. IXE. IER ) is set. These 
messages ere printed before the associated general message. 


Extended error messages contein supplementary error information such 
es register contents or /bed dete. These ere always printed unless 
the IXE and/or IER flag is set. These messages ere printed after the 
essocisted general error message and eny associated besic error 
messages. A typical extended error message might have ea following 


format: 

TRANSMIT DESCRIPTOR LIST RECEIVE DESCRIPTOR LIST 
Flag Word Flag Word 
Low Order Addr Bits Low Order Addr Cits 
High Order Addr Bits High Order Addr Bits 
Packet Length (byte) Packet Length (byte) 
Status Word 1 Stetus Word 1 
Stetus Word 2 Status Word 2 
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QNADO 
GLOBAL DEFINITION MODULE 


M1 


DEQNA FUNCTIONAL TEST 


SPLCIFIC ERROR MESSAGES 


The following ere possible error messages. 


DEQNA FATAL ERROR DETECTED 

ACTUAL DATA = octel number EXPECTED DATA = octel number 

BAD CSR: ACT = octel number EXP = octel number 

BAD TRANSMIT FLAG WORD: ACT = octel number EXP = octel number 
BAD TRANSMIT STATUS WORD 1: ACT = octel number EXP = octel number 
BAD RECEIVE FLAG WORD: ACT = octel number EXP = octel number 
BAD RECEIVE STATUS WORD 1: ACT = octel number EXP = octel number 
BAD RECEIVE BUFFER — ACT = octel number EXP = octel number 
BAD CSR = octel numbe 

LOOPBACK PACKET UNABLE TO SET CA BIT. CSR = octel number 
LOOPBACK PACKET UNABLE TO CLEAR CA BIT. CSR = octel number 

CA BIT OK, BUT RI BIT IS NOT ON, CSR = octel number 

CA BIT IN THE CSR WAS SET TOO EARLY. CSR = octel number 

BAD CSR, EXPECTED. XL AND RL ( BITS 4.5 ) TO BE RESET 10 0 

BAD CSR, EXPECTED, XL AND AL ( BITS 4.5 ) 10 BE SET TO 1 


BIT 2 ) TO BE RESET 10 0 


CSR ADR = octel number ACTUAL = octel number EXPECTED = octal number 

UNABLE TO RESET DEQNA: ADR: eddress CSR = octel number 

WAIT ABOUT number SECOND(S) 

SANITY TIMER TIMED OUT AS EXPECTED 

NO SANITY TIMER INTERRUPT DETECTED 

DISCONNECT TRANSCEIVER CABLE FROM BULKHEAD ASSEMBLY AND CONNECT 

LOOPBACK CONNECTOR 10 BULKHEAD ASSEMBLY. THEN RETEST 

DISCONNECT BULKHEAD ASSEMBLY FROM DEGNA AND CONNECT 

LOOPBACK CONNECTOR TO a THEN RETEST 

ee FOR LOOSE WIRES IN A LOOPBACK CONNECTOR OR USE DIFFERENT 
CONNECTOR. THEN RETEST 

REPLACE DEQNA, THEN RETEST 

REPLACE BULKHEAD CONNECTOR. THEN RETEST 

Mar TRANSCEIVER CABLE FROM TRANSCEIVER AND CONNECT IT 10 
CONNECTOR AND BULKHEAD ASSEMBLY 

REPLACE TRANSCEIVER CABLE. THEN RETEST 

REPLACE TRANSCEIVER, THEN RETEST 

REPLACE THE FUSE IF BAD, THEN RETEST 

BAD RECEIVE DESCRIPTOR: 

BAD TRANSMIT DESCRIPTOR: 

BAD RECEIVE BUFFER: 

ACTUAL = octel number EXPECTED - octel number INDEX = decimal number 

DMA OPERATION TAKES TOU LONG 

100 MANY DEVICES 

THERE WAS A POWER FAIL - WAITING 

WAIT ABOUT decimal number MINUTE(S) 

WAIT ABOUT decimal number HOUR 

I= NO RESET, TYPE ANY CHARACTER 10 EXIT =ROM TES? 
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SEQ 0035 
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TOR VALUE = ON‘). 

SAD CSR. BITS STUCK AT O: 

BAD CSR. BITS STUCK AT 1: 

SOFTWARE RESET UNABLE TO CLEAR CSR STATIC BITS: 

BAD STATION ADDRESS CHECKSUM: ACT = octel number EXP = octel number 

BAD STATION ADDRESS: stetion eddress 

BAD DEQGNA 1/0 PAGE REGISTER: register address 

BAD CSR. EXPECTED Rt ( BIT 5S ) 10 BE SET TO O 

BAD 6/0 PROM CHECKSUM: INDEX = octel number ACT = octel number EXP = octel number 
6/0 PROM CHECKSUM OFFSET = octel number ACT = octel number EXP = octel number 
BAD INTERRUPT: ADR = octel number ACT LEV = octel number EXP LEV = octel number 
REGISTER FAILED TO RESPOND AT ADDRESS: register eddress 


nee ee ee ee > — 


Be 





ZQNA1 CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Blies-16 V4.1-582 _ a 14 
vo1.0 GLOBAL DEFINITION MODULE 14-Mar-1985 13:07:35 DISK $USER2: [MARSHALL . DEQNA )ZQNA1. au1,3" (13) 
; C 0499 1 4.0 TEST SUMMARIES 

>; C OS0OO 2 — = = = == wmeeeeecreccece 

; ©C 0501 1 

; € oS02 1 Each test hes its own test summery; therefore, test summaries ere not 

; € 0503 1 included here. 

; C 0504 1 

; C 0505 1 5.0 MAINTENANCE HISTORY 

+ C 0OS06 2 j = = = = wren nnennnnennns 

; C 0507 1 

: : 0508 : Rev. CZQNACO changed to CZQNADO in March, 1985 by Howard L. Mershell: 

; C 0509 

; € 0510 1 Modified DMA Timing Test, Test 014, *» allow the test to operate 

; € 0511 1 properly in the faster 18 MHz. KOJU11-8/8F . Chenges are noted by “$$$” 

; © OSi2 1 in the comment field of added of changed lines. 

; € 05135 1 

>; O514 1 )s 

; 0515 1 
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CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL DEFINITION MODULE 


LIBRARY ‘QNALIB‘ ;: 


REQUIRE ‘BLSMAC.REQ’ ; ! DIAGNOSTIC SUPERVISOR LIBRARY 


tee 
: DEFINE THE NUMBER OF TESTS IN THIS DIAGNOSTIC 


PSECT 
CODE = AASCODES; 


LITERAL 
DS$NBR_OF _TESTS = 21; 


EQUALS; 
POINTER CALL); 


THE PROGRAM HEADER IS THE INTERFACE BETWEEN THE DIAGNOSTIC PROGRAM 
AND THE SUPERVISOR. 


HEADER (s#ASCII'CZQNA ‘ ,SASCII'D’ ,WASCII'O’, 120, 0, PRIOO); 


+ 
o 


NO POINTERS ARE OPTIONAL USING BLISS. MAKE SURE THE FOLLOWING 
SECTIONS OF CODE ARE IN PLACE CIN THE CORRECT SKELS),EVEN IF 
THE SECTIONS ARE BLANK. 


ARGUMENT FUNCTION 

RPT REPORT CODE 

SW SOFTWARE TABLE 

SFT SOFTWARE TABLE QUESTIONS 
AU ADD CODE 

DU DROP CODE 

TBL ERROR TABLE 

SETUP ASSEMBLED P-TABLES 


CHANGE THE “HEADER” TO CONTAIN THE PROPER ARGUMENTS. 

ARGUMENTS ARE: NAME ,REV,PATCH,LONGEST TEST TIME, TYPE 
"TYPE" = 0 FOR SEQUENTIAL DIAGNOSTIC AND =1 

FOR EXERCISER. THERE IS ALSO AN OPTIONAL SIXTH ARGUMENT 

WHICH SPECIFIES THE PROCESSOR PRIORITY TO BE SET WHEN 

STARTING THE DIAGNOSTIC (DEFAULT IS 0). 


14-Mar-1985 13:09:10 VAX-11 Bliss-16 v4.1-582 age 
14-Mar-1985 13:07:35  DISK$USER2: (MARSHALL .DEQNA)ZQNA1.BLI;4 


SEQ 0015 
P 
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De 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 Vv4.1-582 -_ i 3 


DISPATCH TABLE 14-Mar-1985 13:07:35 DISK $USER2 : [MARSHALL .DEQNA)ZQNA1. But; ra (15) | 


SSOTTL ‘DISPATCH TABLE’ 
DISPATCH (OS$NBR_OF_TESTS); 


THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 
IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 


CHANGE THE LITERAL DECLARATION OF DS$NBR_OF —— TO BE 
THE NUMBER OF HARDWARE TESTS IN YOUR PROGRAM 


ERRTBL ; 


THE ERRTBL MACRO IS REQUIRED WHETHER OR NOT YOU REPORT ERRORS USING 
THE “ERROR” MACRO. THE ERRTBL MACRO EXPANDS INTO FOUR WORDS THAT 
ARE USED BY THE RUNTIME SERVICES DURING AN ERROR CALL: ERROR TYPE, 
ERROR NUMBER, ADDRESS OF ERROR MESSAGE AND ADDRESS OF MESSAGE 
BLOCK. THERE MUST BE ONLY ONE ERRTBL IN ANY PROGRAM. THIS SECTION 
IS NOT OPTIONAL. 


: 


i 
' 
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CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL DATA SECTION 


Ee 


14-Mar-1985 13:09:10 
14-Mer-1985 13:07:35 


SSBTTL ‘GLOBAL DATA SECTION’ 
PSECT 


PLIT 


= $PLIT$, 


OWN OWNS, 
GLOBAL = $GLOB$; 


—- DATA DEFINED IN THIS SECTION IS USED BY MORE THAN ONE 


GLOBAL 
See 
: COMMUNICATION AREA DECLARATIONS 
RCV_D_LIST : BLOCK { D_SIZE, WORD ) FIELD ( DL_FIELDS ), 
XMIT_D_LIST BLOCK { D_SIZE, WORD ) FIELD ( DL_FIELDS ), 
RCV_BUFF VECTOR { B_SIZE, BYTE }, 
XAT BUFFER VECTOR { B_SIZE, BYTE }, 
_ADR CTOR ( 22, BYTE ), 
SETUD. BUFFER VECTOR { SETUB_SIZE, WORD }, 
IOP_ TABLE : VECTOR { 8, WORD ), 
ETH_STATICN_ADR : VECTOR [{ 6, WORD }, 
STATION_ADR : VECTOR { 4, WORD }, 
PTRN_TABLE VECTOR { 8, BYTE ] INITIAL ( BYTE ( 


#8’ 00000000’, #8'11111111', #8'10101010’, #B8'01010101', 


8B‘ 11001100’, #8'00110011', #68'11110000', #B8‘00001111' )), 


VAX-11 Bliss-16 V4.1-582 
DISK $USER2: [MARSHALL . DEQNA)ZQNA1. at? (16) 


SEQ ae 


meme 
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DEQNA FUNCTIONAL TEST 


CZQNADO 
GLOBAL DATA SECTION 


#X‘' OO’ 7 
sx'SS', 


sX' AA’ 
6x'55' 


eX'FS’, 
#X‘OO', 
» 8X’'OO’, 
. 8X‘OO', 
#X‘OO', 
#X'90', 
#X'OO', 
#X'0OO', 
sX' AA’, 
#X'OO', 
#X'OS', 


aX'Al'. 
sX'BE'. 
“X’FF'. 


: VECTOR { T_SIZE, BYTE 


#X‘OO', 
sx'SS'. 
sX' AA’, 


; ex'ss', 
SXx’FF’. 


SX'FF', 
SX'FA', 
#X'OO', 
#X'O2', 
#x'OS', 
#X'O4', 
sX‘'O4', 
#X'O4', 
#X'OO', 
sX'AA', 
#X‘'O1', 
#X'O6', 


&Xx' 26' 


#X'67', 
#x‘C7', 
SX'FF’, 


#X‘OO', 
#x'SS', 
eX‘ AA‘, 


#X‘SS' 


SX'FF', 
sX'44q', 
#X‘OO', 
sX'AA', 
8Xx'SS', 
SX'FF', 


6X’ 00', 
6x55! , 
6X’ AA’, 
, 6X'SS!, 
SXF, 
6X44! , 
6X'00', 
6X" AA! , 
6x'S5', 
SXF! , 
6X" 00! , 
6X81", 
6X00", 
6X" AR! , 
6X'03', 
6X" 08! , 
6X'27', 
ex'4C', 
6X" 33', 
eX'FF?, 


Fe 


14-Mar-1985 13: 
14-Mer-1985 13: 


] INITIAL ( BYTE 


%X'00', 
sx'5S', 
sX' AA’, 
6x'55', 
SX! FF! , 
6x'SS', 
6X'00', 
sX' AA’, 
“x'55', 
SX'FF!, 
%X'00', 
6X'18', 
6X'00', 
6X‘ AA! , 
6X'04', 
6X‘ 09! , 
6X' 49! , 
6X' OF, 
SX! FF! , 


6X! FF 


2), 


WewOuUlSwhe 


C 


09:10 
07:35 


MEMORY PATTERN 
MEMORY PATTERN 
MEMORY PATTERN 
MEMORY PATTERN 


MEMORY PATTERN 


LOW ETHERNET ADR 
HIGH ETHERNET ADR 


ALL MULTICAST 


STATION ADOR 


—-——— —_—— ee 


SEQ “a 


VAX-11 Bliss-16 V4.1-582 a! 
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| ZQNA1 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16€ V4.1-582 my 19! 
vo1.0 GLOBAL DATA SECTION 14-Mar-1985 13:07:35 | DISK$USER2: (MARSHALL .DEQNAJZQNA1.BLI;4~ (18) | 
s 2132 1 
’ a oes ; BD_PROM_DESCR : VECTOR { BD_D_SIZE, WORD ] INITIAL (€ WORD (€ 
: 

; 2135 1 NEWB, ! BUFFER NOT USED IF 1 

; 2136 1 Vv. ! VALID ADDRESS IF 1 

: 2137 1 RCV_BUFFER, ! RCV BUFFER ADDRESS 

: 2138 1 BYTE_COUNT, ! 1/4 THE BYTE COUNT 

; 2139 1 ° ! STATUS WORD 1 

; 2140 1 0, ! STATUS WORD 2 

; 2141 1 

; 2142 1 NEWB, ! BUFFER NOT USED IF 1 

; 2143 1 V, ! VALID ADDRESS IF 1 

; 2144 1 XMIT_BUFFER, ! XMIT BUFFER ADDRESS 

; 2145 1 BYTE_COUNT, ! 1/4 THE BYTE COUNT 

; 2146 1 oO, ! STATUS WORD 1 

; 2147 1 0, ! STATUS WORD 2 

; 2148 1 

5 2149 1 NEWB, ! BUFFER NOT USED IF 1 

’ 2150 1 ° ! VALID ADDRESS IF i 

; 2151 1 0, ! 2 EXTRA WORDS 

: 2152 1 0 )), : 

s 2i33 1 

; 2154 1 

; a ; TDi6: VECTOR [ 44, WORD ) INITIAL (€ WORD ( 

H 

; 2157 1 NEWB, VL , XMIT_BUFFER » “1. 9, O, ! 1 BYTE DESCRIPTOR 

: 2158 1 NEWB, VHL, XMIT_BUFFER » -2, 9, O, ! 2 BYTE DESCRIPTOR 

; 2159 1 NEWB, VH , XMIT_BUFFER + 2 » “1,90, 0, ! 1 BYTE DESCRIPTOR 

; 21 1 NEWB, VE , XMIT_BUFFER + 4 » -h . 0. QO, ! 2 BYTE DESCRIPTOR 

H 2161 1 NEWB, E e XMIT_D_LIST « 60 . -1 * 0, 0, ! END OF DESCRIPTOR 

: 2162 1 NEWB, V ,. XMIT_D_LIST + 56 » -2 , 9. O, ! 4 BYTE DESCRIPTOR 

; 2163 1 NEWB, VE , TARGET_ADR + 114 , -s . 9 9, ! 6 BYTE DESCRIPTOR 

. 

: = : T0i3: VECTOR { 34, WORD ] INITIAL ¢ WORD ( 

; 16 

: 2169 1 NEWB, V , XMIT_BUFFER + 2 »-i27 , 9, QO. ! 378 BYTE DESCRIPTOR 
$ 2170 1 NEWB, V , XMIT_BUFFER + 256 » “1,90, 9, ! 2 BYTE DESCRIPTOR 
’ 2171 i NEWB, Cc P XMIT_D_LIST + 48 ” - ¢ + QO, ’ CHAIN DESCRIPTOR 
; 2172 1 NEWB, VE , XMIT_BUFFER + 258 » 63 . Oo, 0, ! 2 BYTE DESCRIPTOR 
: ates ; s & Fes ! END OF DESCRIPTOR 
. 

: he : RD13: VECTOR ({ 64, WORD ] INITIAL ( WORD ( 

i 

: 2177 1 NEWB, V , RCV_BUFFER » 71, O. O, ! 2 BYTE DESCRIPTOR 

; 2178 1 NEWS, V , RCV_BUFFER + 2 » “62 , 9, O, ! 124 BYTE DESCRIPTOR 
$ 2179 1 NEWB, V , RCV_BUFFER + 126 » 22. 9 9, ! 2 BYTE DESCRIPTOR 

; 2180 1 NEWS, V , RCV_BUFFER + 128 o 2 « O& YD ! 4 BYTE DESCRIPTOR 

; 2181 1 WB. V ., RCV_BUFFER + 132 , -60 , O, O, ! 120 BYTE DESCRIPTOR 
: 2182 1 NEWB, V , RCV_BUFFER + 252 » “2, YO 9, ! 4 BYTE DESCRIPTOR 

: 2183 1 » VC , RCV_DO_LIST + 84 » -1 , 0. 9. ! CHAIN DESCRIPTOR 

F 2184 1 NEWB, V , RCV_BUFFER + 256 » “3 , D9, 0, ! 6 BYTE DESCRIPTOR 


lle eeeemneenetineneneeneneen eet etree arate eae 
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CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL DATA SECTION 


NEWB . Vv P RCV_BUFFER ° 382 P -1 a 0 ’ 0 * : 2 BYTE DESCRIPTOR 
NEWB, E )), ! END OF DESCRIPTOR 
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SEQ 0020 
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CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL DATA SECTION 


See 
: HARDWARE AND SOFTWARE P-TABLE STORAGE DECLARATIONS 


HWP_TABLE =: REF BLOCK [ HWP_SIZE, WORD ] FIELD ( HWP_FIELDS ), 
SWP_TABLE : REF BLOCK [ SWP_ SIZE, WORD } FIELD ¢ SWP_FIELDS ), 


REG_ADR : REF REG_STR FIELD ( IOP_FIELDS ), 
IOP_DATA : REF REG_STR FIELD ( IOP_FIELDS ), 
GET_ADR : REF ADR_STR FIELD ( IOP_FIELDS ), 


MISCELLANEOUS DATA DECLARATIONS 


XBUF __LENGTH : WORD, ! XMIT BUFFER LENGTH IN WORDS 
LENGTH : WORD, ! RCV BUFFER LENGTH IN BYTES 

INTERRUPT_FLG : WORD, ! 1 = INTERRUPT OCCURED 

DEQNA_NO : WORD, ! DEQNA UNDER TEST THIS PASS 

Cc : WORD, ! ITERATION COUNTER, INDEX 

UP_COUNTER : WORD, ! ITERATION COUNTER, INDEX 

DOWN_COUNTER : WORD, ! ITERATION COUNTER, INDEX 

CHECKSUM : WORD, ! EXPECTED PROM CHECKSUM 

BUF _LENGTH : WORD, ! XMIT BUFFER SIZE IN WORDS 

_WORD : WORD, : y' 

XC_FLAG : WORD INITIAL (0), : 

ERR_NUMBER : WORD INITIAL (0), : 

ERR_FLAG : WORD INITIAL (0), : 

ERR_COUNT : WORD INITIAL (0), : 


SEQ 0021 
14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 Page 21. 
14-Mer-1985 13:07:35 DISK$USER2: [MARSHALL . DEQNA)ZQNA1. BLI;4 (19) 


ee rr 


A — A a Ae eee arene a SNS nee tS 
7 SF GF GF SF GF GF GP Ge Ge SF GF GF Gs GF SS GP Ge Ge Ge Ge es Ge Gs Se es Ss os Os 


eee ew te 


Be ee Be ee be ee bee be ee ee ee Bee ee ee ee ee fee ee ee ee ee bee ee Be ee he Be 


a TT A A TS NT Sn 


ew Dee ee ew 


DEQNA FUNCTIONAL TEST 


See 

q 

: TEMPORARY STORAGE DATA DECLARATIONS 
v 

Soe 


CZQNADO 
GLOBAL DATA SECTION 


TMP _IOP_ADR 


TMP _RE 
TEMP1 


G_DATA 


SSUSNDNDNENISENS 


14-Mar-1985 13:09:10 
14-Mer-1985 13:07:35 


Je 


I/O PAGE REGISTER ADDRESS 
I/O PAGE REG CONTENTS 


TEMPORARY 
TEMPORARY 


PARAMETER 
PARAMETER 


STORAGE LOCATION 
STORAGE LOCATION 
STORAGE LOCATION 
STORAGE LOCATION 
STORAGE LOCATION 
STORAGE LOCATION 
STORAGE LOCATION 
STORAGE LOCATION 
— LOCATION 
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VAX-11 Bliss-16 V4.1-582 
DISK$USER2: : (MARSHALL . DEQNA jZQNA1. 


‘GLOBAL TEXT SECTION’ 


THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, MESSAGES, 
AND ASCII INFORMATION THAT IS USED IN MORE THAN ONE TEST. 


DESCR_LIST = 
DATA_BUFFER = 


RCV_O_LIST, 
RCV_BUFFER, 


HARDWARE AND SOFTWARE QUESTIONS 


(#ASCIZ'DEQNA I/0 PAGE ADR ‘Ds 
CSASCIZ' INTERRUPT VECTOR ADR '‘), 
(sASCIZ'DO YOU WANT TO TEST SANITY TIMER 
(SASCIZ‘IS LOOPBACK CONNECTOR IN DEQNA 
(sASCIZ'SANITY TIMER TIME-OUT VALUE 
(sASCIZ' EXTERNAL LOOPBACK MODE 

(SASCIZ’ SYSTEM HAS BLOCK-MODE MEMORY 


DEVICE ERROR MESSAGES 


= UPLIT (#ASCIZ' DEQNA FATAL ERROR DETECTED ‘), 
¢ IZ‘ SNSNSA 


UPLIT (sASC DEQNA ADDRESS: s068A, STATION ADDRESS: ‘). 

UPLIT (sSASCIZ‘'SA ACTUAL DATA = s068A EXPECTED DATA = sO06SN‘ ), 
UPLIT (sASCIZ‘ SA XMIT DESCRIPTOR RCV DESCRIPTOR SN‘), 
UPLIT (sASCIZ‘' SA FLAG WORD SO6SA S06EN' ), 
UPLIT (sASCIZ' SA HIGH ORDER ADDR BITS s068A SO68N' ). 
UPLIT (sASCIZ'SA LOW ORDER ADDR BITS sO68A SO06EN' ). 
UPLIT (sASCIZ'SA PACKET LENGTH (€ WD ) sO6S8A S06EN' ), 
UPLIT (sASCIZ'SA STATUS WORD 1 SO68A SO6EN‘ ), 
UPLIT (sASCIZ'SA STATUS SO068A SO06EN* ), 
UPLIT (sASCIZ'SA DEQNA CSR REGISTER SO6EN' ), 

UPLIT (sSASCIZ‘SA DEQNA I/0 PAGE ADR SO6ENEN' ), 

UPLIT (sSASCIZ'SA BAD CSR: ACT = SO68A EXP = SO6SN'), 

UPLIT (sASCIZ‘'SA BAD TRANSMIT FLAG WORD: ACT = SO68A EXP = SO6HN' ), 

UPLIT (sASCIZ'SA BAD TRANSMIT STATUS WORD 1: ACT = SO68A EXP = SO65N' ), 
UPLIT (sASCIZ‘'SA BAD RECEIVE FLAG WORD: ACT = SO068A EXP = SO6N' ), 

UPLIT (SASCIZ‘'SA BAD RECEZVE STATUS WORD 1: ACT = SO068A EXP = S068N'), 
UPLIT (SASCIZ'SA GAD RECEIVE BUFFER LENGTH: ACT = s068A EXP = SO6N' ), 
UPLIT (sSASCIZ‘'SA BAD CSR = SO6SN' ), 

UPLIT (#ASCIZ'SA LOOPBACK PACKET UNABLE TO SET CA BIT, CSR = s06mN' ), 
UPLIT (sASCIZ'SA LOOPBACK PACKET UNABLE TO CLEAR CA BIT, CSR = sO6EN'), 
UPLIT (sASCIZ‘'SA CA BIT OK, BUT RI BIT IS NOT ON, CSR = sO068N'), 


SEQ — 
Page 23 
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SEQ 0024 

ZQNA1 CZQNADO DEGNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 v4.1-562 Pege 24 
v01.0 GLOBAL TEXT SECTION 14-Mer-1985 13:07:35  DISKSUSER2: [MARSHALL .DEQNA)ZQNA1.BLI;4~ (21) 
; 2303 1 MSG22 = UPLIT (SASCIZ‘SA CA BIT IN THE CSR WAS SET TOO EARLY. CSR = sO6SN’), 

; 2304 1 MSG23 = UPLIT (SASCIZ‘SA XL AND RL ( BITS 4,5 ) TO BE RESET TO OnN’), 

; 2305 1 MSG24 = UPLIT (SASCIZ'SA XL AND RL ( BITS 4.5 ) TO BE SET TO ISN’), 

; 2306 1 MSG25 = UPLIT (sASCIZ‘SA RI ( BIT 15 ) TO BE SET TO isn’), 

; 2307 1 MSG26 = UPLIT (SASCIZ‘'SA XI ( BIT 7 ) TO BE SET TO 1mN’), 

; 2308 1 MSG27 = UPLIT (sASCIZ‘SA NI ( BIT 2 ) TO BE SET TO 10N'), 

+ 23509 1 MSG28 = UPLIT (SASCIZ‘'SA NI ( BIT 2 ) TO BE RESET TO OnN'), 

; 2310 1 MSG29 * UPLIT (SASCIZ'SA BAD CSR, EXPECTED’ ). 

i; wena 3 MSGSO = UPLIT (sASCIZ'SA CSR ADR = SO68A ACTUAL = SO6SA EXPECTED « sO6sN’), 

; 2312 1 MSG31 = UPLIT (SASCIZ‘sNSA UNABLE TO RESET DEQNA: ADR: 068A CSR = SO6=N’), 

(; 2313 1 MSG32 = UPLIT (SASCIZ‘SNSA WAIT ABOUT SD28A SECOND(S) -'), 

(; 234 1 MSG33 = UPLIT (SASCIZ‘SNSA SANITY TIMER TIMED OUT AS EXPECTED aN’), 

1; 2315 1 MSG34 = UPLIT (#ASCIZ‘’SNSA NO SANITY TIMER INTERRUPT DETECTED aN’). 
i: 2316 1 MSG3S = UPLIT (SASCIZ‘sNSA DISCONNECT TRANSCEIVER CABLE FROM BULKHEAD ASSEMBLY AND: 

; 2317 1 MSG36 ONNECT CONNE MEAD ASSEMBLY. THEN RETESTAN: ), 
; 2318 3 MSG37 = GNA AND CONNECT’), 

; 2319 1 MSG38 LOOPBACK CONNECTOR TO DEQNA, THEN RETESTSN’ >. 

ls 2320 1 MSG39 = UPLIT (#ASCIZ'sNSA CHECK FOR LOOSE WIRES IN A LOOPBACK CONNECTOR’ ) 

s geal 1 MSG4O = ERENT LOOPBACK CONNECTOR, THEN RETEST@N: ) 

; 2322 1 MSG41 = UPLIT (SASCIZ‘SNSA REPLACE DEQNA, THEN RETEST&N’ ), 

: 2323 1 MSG42 = UPLIT (SASCIZ‘sNSA REPLACE BULKHEAD CONNECTOR, THEN RETESTSN’ ), 

; 2326 1 MSG43 = UPLIT (SASCIZ’sNSA DISCONNECT TRANSCEIVER CABLE FROM TRANSCEIVER: ). 

: 2325 1 MSG44 = UPLIT (sASCIZ‘sNSA AND CONNECT IT TO LOOPBACK CONNECTOR AND BULKHEAD ASSEMBL YSN: ), 
: 2326 1 MSG45 = UPLIT (#ASCIZ’SNSA REPLACE TRANSCEIVER CABLE, THEN RETEST&N’ ), 

; 2327 1 MSG46 = UPLIT (SASCIZ‘SNSA REPLACE TRANSCEIVER, THEN RETEST@N: ), 

; 2328 ? MSG47 = UPLIT (SASCIZ‘SNSA REPLACE THE FUSE IF BAD, THEN RETEST&N' ), 

: 2329 1 MSG48 = UPLIT (sASCIZ‘SNSA BAD RECEIVE DESCRIPTOR: ), 

; 2330 1 MSG49 = UPLIT (SASCIZ'SNSA BAD TRANSMIT DESCRIPTOR: ‘ ), 

; 2331 1 MSGSO = UPLIT (SASCIZ‘SA ACTUAL = SO6SA EXPECTED = s06sA INDEX = sD4mN:), 

+ 2332 1 MSG51 = UPLIT (sASCIZ'sNSA BAD RECEIVE BUFFER: ). 

; ges i MSGS2 = UPLIT (#ASCIZ‘SNSA DMA OPERATION TAKES TOO LONGSN’ ), 

; 2334 1 MSGS3 = UPLIT (SASCIZ’sNSA TOO MANY DEVICES@N’ ). 

; 2335 1 MSGS4 = UPLIT (ASCIZ‘SNSA THERE WAS A POWER FAIL - WAITINGSN’ ), 

; 2336 1 MSGSS = UPLIT (SASCIZ'SNSA WAIT ABOUT SD26A MINUTE(S) -*), 

; 2337 1 MSGS6 = UPLIT (SASCIZ’SNSA WAIT ABOUT HOUR -'), 

; 2338 1 MSGS? = UPLIT (#ASCI2'SA IF NO RESET, TYPE ANY CHARACTER TO EXIT FROM TESTSN’), 

; 2339 1 MSGS8 = UPLIT (SASCIZ‘SNSA TOR VALUE IS EQUAL TO ZERO sN’), 

; 2340 1 ED. 6 RET SII aw oo nan dn ventas kd acep coe m enn ececcnerennese cecewen cena cescnccees aN), 
; 2341 1 MSG60 = UPLIT (SASCIZ‘’sNSA BAD CSR. BITS STUCK AT 0:0N'), 

; 2342 1 MSG61 = UPLIT (SASCIZ‘sNSA BAD CSR. BITS STUCK AT 1:mN'), 

; 2343 1 MSG62 = UPLIT (SASCIZ’SNSA SOFTWARE RESET UNABLE TO CLEAR CSR STATIC BITS:«N'). 

; 2348 1 MSG63 = UPLIT (SASCIZ‘’SNSA BAD STATION ADDRESS CHECKSUM: ACT = sO6sA EXP = sO6sN:). 

36 23451 MSG64 = UPLIT (sASCIZ'SNSA BAD STATION ADDRESS: '), 

1; 2346 1 MSG6S = UPLIT (sASCIZ’SNSA BAD DEQNA 1/0 PAGE REGISTER:=N' ), 

1 234701 MSG66 = UPLIT (sASCIZ’SNSA BAD CSR, EXPECTED RL ( BIT 5S ) TO BE SET TO OmN'). 

i; 2348 1 MSG67 = UPLIT (sASCIZ*SNSA BAD B/D PROM CHECKSUM: INDEX = 068A ACT = sOGSA EXP = sO6HN: ). 
; 2349 1 MSG68 = UPLIT (sASCIZ‘SNSA B/D PROM CHECKSUM OFFSET = SO6SA ACT = SO6SA EXP = SO6SN' ). 

: 2350 1 MSG69 = UPLIT (SASCIZ‘SNSA BAD INTERRUPT: ADR = SO6SA ACT LEV = s06SA EXP LEV = SO6mN' ), 
2351 1 MSG70 = UPLIT (SASCIZ‘SNSA REGISTER FAILED TO RESPOND AT ADDRESS: sO6mN' ). 

; phi : MSG71 = UPLIT (sASCIZ’'SNSA BAD TRANSMIT STATUS, TOO MANY COLLISIONSSN’ ); 

2 

; 2334 1 

; 2355 } 
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CZQNADO DEQNA FUNCTIONAL TEST 
DEFAULT HARDWARE P-TABLE 


tt 


Me 


SSBTTL ‘DEFAULT HARDWARE P-TABLE’ 
BGNHW ( HP_TABLE ); 


THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES ‘F THE 
TEST-DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE .~ IDENTICAL T0 
THE STRUCTURE OF THE HARDWARE ©-TABLES, AND IS USED AS aA “TEMPLATE” 
FOR BUILDING THE P-TABLES. 


PLACE YOUR DEFAULT a P-TABLE HERE. THE VALUES pe 
SIZE WILL BE USED AS A “TEMPLATE” FOR CREATING ACTUAL P-TABLE 
ENTRIES AND THE DEFAULT VALUES IN THE OPERATOR DIALOGUE. 
—- P-TABLE BUILT AT RUNTIME IS STORED IN SUPERVISOR 


GLOBAL 
ENDHW ; 


OFSTBL : BLOCK [ HWP_SIZE, WORD ] INITIAL ( #0'174440', 80'700' ); 


14-Mer-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 Pege 25 
14-Mer-1985 13:07:35 DISK SUSER2: [MARSHALL . DEQNA]ZQNA1. BLI;4 (22) 


SEQ goes 
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SEQ Po nici 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1965 13:09:10 VAX-11 Blise-16 V4.1-582 


SOFTWARE P-TABLE 14-Mer-1985 13:07:35 DISK SUSER2: TMARSHALL DEQNA )ZQNA1. eut,s™ 


SSBTTL ‘SOFTWARE P-TABLE’ 


THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE 
PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 
om 7 — TIME AND MAY BE VARIED BY THE OPERATOR 


PLACE YOUR SOFTWARE P-TABLE HERE.USING GLOBAL OR OWN DECLARATIONS 
THIS TABLE IS NOT OPTIONAL. THIS TABLE, UNLIKE THE HAROWARE TABLE, 
WILL CONTAIN THE ACTUAL VALUES ENTERED BY THE OPERATOR. 


BGNSW ( SP_TABLE ); 


GLOBAL 
SWP_TIMER : WORD INITIAL ( NO ), ! NO SANITY TIMER TEST 
SWP __BC : WORD INITIAL ( NO ), ! NO LOOPBACK IN DEQNA 
SWP_TOUT_VAL : WORD INITIAL ( 3 ), ! TIMEOUT VALUE = 16 SEC. 
SWP _ILOOP : WORD INITIAL ( NO ), ! EXTERNAL LOOPBACK MODE 
SWP_BLOCK_MEM : WORD INITIAL (€ YES ); ! BLOCK-MODE MEMORY PRESENT 


ENDSW; 
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ZQNA1 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:09:10 VAX-11 Blies-16 V4.1-582 m4 27 
vo1.0 PROTECTION TABLE 14-Mer-1985 13:07:35 DISKSUSER2: : (MARSHALL . DEQNA )ZQNA1. BL1;4- (24) 
: 2405 1 SSBTTL ‘PROTECTION TABLE’ 
3 2406 1 
3 2407 1 tee 
5 2408 ; : THIS TABLE IS USED BY THE RUNTIME SERVICES TO PROTECT THE LOAD MEDIA. 
s 2410 1 : iST ARG = OFFSET INTO P-TABLE FOR CSR ADDRESS 
3 2411 1 H 2ND ARG = OFFSET INTO P-TABLE FOR MASSBUS ADDRESS 
3 poe : : 3RD ARG = OFFSET INTO P-TABLE FOR DRIVE NUMBER 
3 My 
: 2414 1 : INSERT BYTE OFFSET FOR DATA NOTED IN COMMENTS ABOVE. COFFSET 
3 2415 1 : REFERS TO THE NUMBER OF BYTES FROM THE BEGINNING OF A PTABLE 
3 2416 1 : ENTRY TO THE ITEM IN QUESTION.) IF _ PARTICULAR 
3 24:7 1 : ITEM DOES NOT APPLY, LEAVE ENTRY AS - WHEN THE RUNTIME 
5 2418 1 : SERVICES EXECUTES A GPHARD, IT USES THESE OFFSETS CIF NOT 
3 2419 1 : SET TO -1) TO GET THE ITEMS AND COMPARE WITH THOSE SAVED 
’ 2420 1 : IN THE XXDP+ MONITOR. IF THE UNIT BEING REQUESTED MATCHES THE 
$ 2421 1 : LOAD DEVICE, THE RUNTIME SERVICES RETURN AN INCOMPLETE FLAG ON 
s 2422 1 ! THE GPHARD. 
’ 2423 1 $.- 
$ 2424 i 
> 2425 1 BGNPROT (-1, -l, -1); 
8 2426 1 
: 2427 1 ENDPROT ; 
3 2428 1 
3 1 
3 2430 1 
8 2431 1 END 
’ 2432 0 ELUDOM 
-TITLE ZQNA1 oo DEQNA FUNCTIONAL TEST 
-IDENT /V01.0 
‘ AMA 
-PSECT $sCODE$, RO 
132 121 L$NAME::.ASCII /CZQ/ 
101 040 -ASCII /NA / 
.BYTE 90 
BYTE 9 
L$REV: 
-ASCII /D/ 
-ASCII /0/ 
L$UNIT::.WORD TS$PTHV 
L$TIML::.WORD 170 
L$HPCP::.WORD LS$HARD 
L$SPCP::.WORD L$SOFT 
L$HPTP::.WORD LS$HW 
L$SPTP::.WORD L#$SW 
L$LADP::.WORD LS$LAST 
L$STA:: .WORD 0O 
L$CO:: .WORD 9 
L$DTYP:: .WORD 0 





<= —_-| * Ewe ee ee rr rrr ee ren tem ee em 


C3 


SEQ 00 i 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-5862 jon 28! 
PROTECTION TABLE 14-Mer-1985 13:07:35 DISK$USER2: (MARSHALL .DEQNAJZQNA1.BLI;4 (24) | 
L$APT:: .WORD 0O 
L$DTP:: .WORD LS$DISPATCH 
L$PRIO::.WORD 0O 
LS$ENVI::.WORD 0 
LS$EXP1::.WORD O 
L$MREV: : 
YTE 3 * 
YTE 5 
LSeF WORD : 
L$SPC:: .WORD 0 
LS$DEVP::.WORD LS$DVTYP 
L$REPP::.WORD  LS$RPT 
LSEXP4:: .WORD 
L$EXP5::.WORD oO 
L$AUT:: 
L$DU 
L$LUN:: 
L$DESP:: L$DESC 
L$LOAD:: -73743 
L$CCP:: . L$CLEAN 
L$ACP:: . L$AUTO 
LS$PRT:: . L$PROT 
L$TEST::. 0 
L$DLY:: . 0 
L$HIME::. ] 
D$PCNT::. 25 
L$DISPATCH:: 
Ti 
T2 


re - 
MT 5 
On é 
vv 
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ERRTYP:: .BLKW i 
ERRNBR: : .BLKW 1 





CZQNADO DEQNA FUNCTIONAL TEST 


 ZQNAL 

_Vv01.0 PROTECTION TABLE 
000202 

000204 

000206 O000000C 

000210 174440 

000212 000700 

000214 

000216 O00000C 

000220 000000 

000222 000000 

000224 000003 

000226 000000 

000230 000001 

000232 

000234 177777 

000236 177777 

000240 177777 

000000 

000000 104 105 121 
000003 116 101 040 
000006 111 057 117 
000011 040 120 101 
000014 107 105 040 
000017 101 104 122 
000022 040 040 040 
000025 040 000 000 
000030 111 116 124 
000033 105 122 122 
000036 125 120 124 
000041 040 126 105 
000044 103 124 117 
000047 122 040 101 
000052 104 122 040 
000055 040 000 000 
SO006C 104 117 040 
900063 131 117 125 
90006€ 040 127 101 
900071 116 124 040 
900074 124 117 040 
900077 124 105 123 
900102 124 040 123 
900105 101 116 111i 
900110 124 131 040 
900113 124 111 115 


ERRMSG: : 
ERRBLK : 
L $HWLEN: 


nae 3 


L$NDHW: : 
L$SWLEN: : 


* WORD 
SWP. TIMER: : 
SWP .LBC:: 

. WORD 
SWP.TOUT.VAL:: 

. WORD 
SWP .ILOOP:: 

WOR 


SWP .BLOCK.MEM: : 
WORD 
L$NDSW:: 


“BLKW 


L$PROT: : .WORD 


P.AAA: 


P.AAC: 


DS 


14-Mar-1985 13:09:10 
14-Mer-1985 13:07:35 


i 
1 


<<L $NDHW-L $HWLEN>/2> 
3340 


700 
1 


<<L $NDSW-L$SWLEN>/2> 


$PLIT$, 
/DEQ/ 


/NA / 
41/<57>/0/ 
4 PA/ 
/GE / 
/ADR/ 


f / 
4 4<QQ0><00> 


RO , D 
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SEQ 0029 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 — ae 30 ! 
PROTECTION TABLE 14-Mer-1985 13:07:35 DISK $USER2: : (MARSHALL . DEQNAJZQNA1.BLI;4 (24)! 
105 122 040 -ASCII /ER / 
000 -ASCII <0O0O> 
111 i123 040 P.AAD: .ASCII /IS / 
114 117 117 -ASCII /L00/ 
120 102 101 -ASCII /PBA/ 
103 113 -ASCII /CK / | 
103 117 116 -ASCII /CON/ | 
116 105 103 .ASCII /NEC/ 
124 117 122 -ASCII /TOR/ 
111 116 -ASCII / IN/ | 
104 105 -ASCII / DE/ 
i121 116 101 -ASCII /QNA/ 
040 040 040 -ASCII / / 
.ASCII <0O0O> 
i23 101 116 P.AAE: .ASCII /SAN/ 
111 124 i31 -ASCII /ITY/ 
124 111 -ASCII / TI/ 
115 105 122 -ASCII /MER/ 
124 111 -ASCII / TI/ 
115 105 055 -ASCII /ME-/ 
117 125 124 -ASCII /OUT/ 
126 101 -ASCII / VA/ 
114 125 105 -ASCII /LUE/ 
040 040 -ASCII / / 
040 040 040 -ASCII / / 
000 -ASCII <00O> 
105 130 124 P.AAF: .ASCII /EXT/ 
105 122 116 -ASCII /ERN/ 
101 114 040 -ASCII /AL / 
114 117 117 -ASCII /LOO/ 
120 102 101 -ASCII /PBA/ 
103 113 040 -ASCII /CK / 
115 117 104 -ASCII /MOD/ 
105 040 040 -ASCII /E / 
040 040 ASCII / / 
040 040 040 ASCII / / 
040 040 040 -ASCII / / 
000 -ASCII <00> 
123 131 123 P.AAG: .ASCII /SYS/ 
124 105 115 -ASCII /TEM/ 
040 110 101 -ASCII / HA/ 
123 040 102 -ASCII /S B/ 
114 117 103 -ASCII /LOC/ 
113 055 115 -ASCII /K-M/ 
117 104 105 -ASCII /0ODE/ 
040 115 105 -ASCII / ME/ 
115 117 122 -ASCII /MOR/ 
131 040 040 MSGi 6 7¥. 7 
040 040 040 ASCII / / 
000 -ASCII <OO> 
040 104 105 P.AAH: .ASCII / DE/ 
121i 116 101 -ASCII /QNA/ 
106 101 -ASCII / FA/ 
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CZQNADO DEQNA FUNCTIONAL TEST 


PROTECTION TABLE 


101 


P.AAJ: 


P.AAK: 


ro 


14-Mar-1985 13:09:10 
14-Mer-1985 13:07:35 


/TED/ 


SEQ 0031 
VAX-11 Bliss-16 V4.1-582 Page 31 
DISK$USER2: [MARSHALL .DEQNA)ZQNA1.BLI;4 (24) 
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CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 my 32 ! 
PROTECTION TABLE 14-Mar-1985 13:07:35 DISK$USER2: [MARSHALL .DEQNAJZQNA1.BLI;4 (24) 

124 040 104 ASCII /T D/ 
105 123 103 ASCII /€SC/ 
122 111 120 ASCII /RIP/ 
124 117 122 ASCII /TOR/ 
040 040 040 ASCII / / 
040 122 103 ASCII / RC/ 
126 040 104 .ASCII /V D/ 
105 123 103 ASCII /€SC/ 
122 111 120 ASCII /RIP/ 
124 117 122 ASCII /TOR/ 
040 045 116 ASCII / #N/ 
000 000 SCII <00><00> 
045 101 040 P.AAL ASCII /#A / 
040 040 040 ScI / / 
040 040 106 ASCII / F/ 
114 101 107 ASCII /LAG/ 
040 127 117 ASCII / WO/ 
122 104 040 CII /RD / 
040 040 040 ASCII / / 
040 040 040 ASCII / / 
040 040 040 -ASCII / / 
040 040 040 CII / / 
040 040 040 ASCII / é 
040 040 045 -ASCII / #/ 
117 066 045 II /06s/, 
101 040 040 -ASCII /A / 
040 040 040 j a3 (CU / 
040 040 040 oan 2. OA 
040 040 040 . oo a ae 
040 045 117 -ASCII / #0/ 
066 045 116 -ASCII /68N/ 
000 -ASCII <00O> 
045 101 040 P.AAM: .ASCII /#A / 
040 040 040 -ASCII / / 
040 040 110 -ASCII / H/ 
111 107 110 -ASCII /IGH/ 
040 117 122 -ASCII / OR/ 
104 105 122 -ASCII /DER/ 
040 101 104 -ASCII / AOD/ 
104 122 040 -ASCII /OR / 
102 111 124 -ASCII /BIT/ 
123 040 040 -ASCII /S / 
040 040 040 S 7 > Beer eee 
040 040 045 -ASCII / #/ 
117 066 045 -ASCII /06s8/ 
101 040 040 ASCII /A / 
040 040 040 — => Gan Sa 4 
040 040 040 ASCII / / 
040 040 040 ASCII / / 
040 045 117 ASCII / #0/ 
066 045 116 ‘ II /68N/ 
000 -ASCII <0OO> 
045 101 040 P.AAN: .ASCII /#A / 
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CZQNADO DEQNA FUNCTIONAL TEST 
PROTECTION TABLE 


040 040 
040 114 
127 040 
117 122 
105 122 
101 104 
122 040 
111 124 
040 040 
040 040 
040 045 
066 045 
040 040 
040 040 
040 040 
040 040 
045 117 
045 116 
101 040 P.AAO: 
040 040 
040 120 
103 113 
124 040 
105 116 
124 110 
050 040 
104 040 
040 040 
040 040 
040 045 
066 045 
040 040 
040 040 
040 040 
040 040 
045 117 
045 116 
101 040 P.AAP: 
040 040 
040 123 
101 124 
123 040 
117 122 
040 061 
040 040 
040 040 
040 040 
040 040 
040 045 
066 045 
040 040 
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SEQ 0033 
VAX-11 Bliss-16 V4.1-5862 Page 33 
DISK $USER2: [MARSHALL .DEQNA)ZQNA1. BLI;4" (24) 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-562 Page 34! 





SEQ 0034 
PROTECTION TABLE 14-Mar-1985 13:07:35 §DISK$USFR2: (MARSHALL .DEQNAJZQNA1.BL1;4 (24) | 
040 040 ASCII / / | 
040 040 040 ASCII / / 
040 040 040 ASCII / / | 
040 045 117 -ASCII / #0/ 
066 045 116 -ASCII /6N/ ! 
000 .ASCII <00> 
045 101 040 P.AAQ: .ASCII /#A / | 
040 040 AS ow 
040 040 123 ASCII / S/ 
124 101 124 -ASCII /TAT/ 
125 123 040 .ASCII /US / 
127 117 122 .ASCII /WOR/ 
104 040 062 .ASCII /D 2/ 
040 040 040 a s 6 
040 040 040 ASCII / / 
040 040 040 ae ae 
040 040 040 aserr / Of 
040 040 045 ASCII / #/ 
117 066 045 -ASCII /06%/ 
101 040 040 ASCII /A / 
040 040 040 ASCII / / 
040 040 ars of 
040 040 040 ASCII / / 
040 045 117 ASCII / #0/ 
066 045 116 -ASCII /6%N/ 
000 -ASCII <00O> 
045 101 040 P.AAR: .ASCII /sA / 
040 040 040 .ASCII / 
040 040 104 ASCII / O/ 
105 121 116 .ASCII /EQN/ 
101 040 103 -ASCII /A C/ 
123 122 040 -ASCII /SR / 
122 105 107 .ASCII /REG/ 
111 123 124 .ASCII /IST/ 
105 122 040 .ASCII /ER / 
040 040 040 cit ss 
040 040 040 ASCII / / 
040 040 040 ASCII / / 
040 040 040 Actt  ¢° 7 
040 040 040 . 7 a 
040 040 045 ASCII / #/ 
117 066 045 -ASCII /06%/ 
116 000 AS /N/<00> 
101 040 P.AAS: .ASCII /#A / 
040 040 040 -ASCII / 
040 040 104 ASCII ¢ (0/ 
105 121 116 -ASCII /EQN/ 
101 040 111 -ASCII /A I/ 
057 117 040 -ASCII <57>/0 / 
120 101 107 -ASCII /PAG/ 
105 101 “ASCII /E A/ | 
104 122 040 ASCII /OR / 
040 040 ASCII / / | 
| 
| 
| 


re ee ee etn ~ <a> ~o ov 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 “sae os! 
PROTECTION TABLE 14-Mar-1985 13:07:35  DISK$USER2: (MARSHALL .DEQNAJZQNA.BLI;4° (24) | 

040 040 040 ASCII / / | 
040 040 040 “ASCII /  / 
040 040 040 “ASCII /  / , 
040 040 040 “ASCII /  / : 
040 040 045 ASCII / %/ . 
117 (066——s«(AS ASCII /06%/ ! 
116 ©6045——si116 ‘ASCII = /NSN/ | 
000 -ASCII <00O> 
045 101 040 P.AAT: .ASCII /#A / 1 
102 «101-2104 ‘ASCII /BAD/ 
040 103 123 ‘ASCII / CS/ | 
122 072 040 ASCII /R: / 
101 103 8§= 124 “ASCII /ACT/ 
075 040 ASCII / = / 
045 89117 ‘ASCII /#06/ 
045 101 040 “ASCII /sA_/ 
105 130 «120 “ASCII /EXP/ 
040 075 040 “ASCII / = / 
045 117 066 -ASCII /#06/ 
045 116 000 ‘ASCII /#N/<00> 
045 101 040 P.AAU: .ASCII /#A_/ 
102 101 = 104 “ASCII /BAD/ 
040 124 122 ASCII / TR/ 
101 896116 = 123 “ASCII /ANS/ 
115° 111 ~—Ss«124 “ASCII /MIT/ 
106 489s 114 ASCII / FL/ 
101 107 040 ASCII /AG / 
— a oe -ASCII /WOR/ 
104 = «072 0 ASCII /0: / 
101 103 #8§=. 124 “ASCII /ACT/ 
040 075 040 “ASCII / = / 
045 117 066 ASCII /#06/ 
045 101 040 ASCII /#A / 
105 130 120 ASCII /EXP/ 
040 O75 040 “ASCII / = / 
045 117 066 ASCII /#06/ 
045 116 000 -ASCII /#N/<00> 
000 -ASCII <00> 
0465 101 040 P.AAV: .ASCII /#A / 
102 101 = 104 ASCII /BAD/ 
040 124 #122 “ASCII / TR/ 
101 «116123 ASCII /ANS/ 
115 111 = 124 ASCII. /MIT/ 
123s «124 ASCII / ST/ 
101 = 124—Ss:125 ASCII /ATU/ 
123 040 &#§127 ASCII /S W/ 
117. 122,—t—t—«208 “ASCII /ORD/ 
040 061 072 “ASCII / 1:/ 
040 101 103 ASCII / AC/ 
124 040 075 ‘ASCII /T =/ 
040 490452 = 117 “ASCII / #0/ | 
06 O45 101 “ASCII /6sA/ | 
040 105 130 ASCII / EX/ | 
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SEQ 0036 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 Page 36° 
PROTECTION TABLE 14-Mar-1985 13:07:35 DISK$USER2: [MARSHALL .DEQNAJZQNA1.BLI;4 (24). 

120 040 075 .ASCII /P =/ 
040 045 117 .ASCII / #0/ | 
066 045 116 ASCII /69N/ | 
000 000 .ASCII <00><00> 
045 101 040 P.AAW: .ASCII /#A / 
102 101 104 ASCII /BAD/ | 
040 122 105 .ASCII / RE/ 
103 105 111 ASCII /CEI/ 
126 105 040 .ASCII /VE / 
106 114 101 .ASCII /FLA/ 
107 127 .ASCII /G W/ 
117 122 104 .ASCII /ORD/ | 
072 101 .ASCII /: A/ | 
103 124 040 ASCII /CT / 
075 040 «= 045 “ASCII /= #/ 
117 066 045 ASCII /068/ 
101 040 105 .ASCII /A E/ 
130 120 040 .ASCII /XP / 
075 040 045 -ASCII /= #/ 
117 066 045 ASCII /06%/ 
116 000 : /N/<00> 
045 101 040 P.AAX: .ASCII /#A / | 
102 101 104 .ASCII /BAD/ 

122 105 .ASCII / RE/ 
103 105 111 .ASCII /CEI/ 
126 105 040 .ASCII /VE / 
123 124 101 .ASCII /STA/ 
124 125 123 .ASCII /TUS/ 
040 127 117 -ASCII / WO/ 
122 104 040 .ASCII /RD / 
061 072 040 .ASCII /1: / 
101 103 124 .ASCII /ACT/ 
040 075 040 ASCII / 2 / | 
045 117 066 ASCII /#06/ 
045 101 040 ASCII /sA / 
105 130 120 .ASCII /€XP/ 
040 075 040 ASCII /=#/ 
045 117 066 ASCII /#806/ 
045 116 000 ASCII /8N/<00> 
045 101 040 P.AAY: .ASCII /#A / 
102 101 104 .ASCII /BAD/ 

122 105 -ASCII / RE/ 
103 i lil .ASCII /CEI/ 
126 105 040 -ASCII /VE / 
102 125 106 .ASCII 
106 105 122 -ASCII /FER/ 
040 114 105 ASCII / LE/ 
116 107 124 ASCII /NGT/ | 
110 072 040 ASCII /H: / 
101 103 124 ASCII /ACT/ 
040 075 040 ASCII / = / 
045 117 066 ASCII /#06/ 
045 101 040 ASCII /#A / 





LL 
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PROTECTION TABLE 14-Mer-1985 13:07:35 DISK $USER2: [MARSHALL .DEQNA]ZQNA1.BL1;4 (24) 

105 130 120 -ASCII /EXP/ 

040 075 040 ASCII / 2/7 

045 117 066 -ASCII /#806/ 

045 116 000 -ASCII /#N/<00> 

045 101 040 P.AAZ: .ASCII /#A / 

102 101 104 -ASCII /BAD/ 

640 103 123 -ASCII / CS/ 

122 075 -ASCII /R =/ 

045 117 -ASCII / #0/ 

066 045 116 -ASCII /68N/ 

000 000 .ASCII <00><00> 

045 101 040 P.ABA: .ASCII /#A / 

114 117 117 -ASCII /LOO/ 

120 102 i101 .ASCII /PBA/ 

103 113 040 -ASCII /CK / 

120 101 103 -ASCII /PAC/ 

113 105 124 -ASCII /KET/ 

125 116 -ASCII / UN/ 

101 102 114 -ASCII /ABL/ 

105 040 124 -ASCII /E T/ 

117 040 123 -ASCII /0 S/ 

105 124 040 -ASCII /€T / 

103 101 040 -ASCII /CA / 

102 ili 124 -ASCII /BIT/ 

040 103 -ASCII /, C/ 

123 122 -ASCII /SR / 

075 040 045 -ASCII /= &/ 

117 066 045 -ASCII /06s8/ 

116 000 000 -ASCII /N/<00><00> 

045 101 040 P.ABB: .ASCII 

114 117 117 -ASCII /1L00/ 

120 102 101 -ASCII /PBA/ 

103 113 -ASCII /CK / 

120 101 103 ASCII /PAC/ 

113 105 124 .ASCII /KET/ 

040 125 116 -ASCII / UN/ 

101 102 114 -ASCII /ABL/ 

105 124 -ASCII /€ T/ 

117 040 103 -ASCII /0 C/ 

114 105 101 -ASCII /LEA/ 

122 040 103 ASCII /R C/ 

101 040 102 -ASCII /A B/ 

111i 124 -ASCII /1IT,/ 

103 123 -ASCII 7 CS/ 

122 075 -ASCII /R =/ 

040 045 117 -ASCII / #0/ 

066 045 116 .ASCII /6sN/ 

000 000 -ASCII <00><00> 

045 101 040 P.ABC: .ASCII /#A / 

103 101 040 -ASCII /CA / 

102 111 124 -ASCII /®8IT/ 

040 117 113 -ASCII / OK/ 

054 040 102 -ASCII /, B/ 
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CZQNADO DEQNA FUNCTIONAL TEST 


PROTECTION TABLE 


P. ABD: 


P.ABF: 


———— inane 


M3 


14-Mer-1985 13:09:10 
14-Mer-19865 13:07:35 


SEQ 0038 


VAX-11 Bliss-16 V4.1-562 


Pege 
DISK SUSER2: [MARSHALL .DEQNA)ZQNA1 .GL1;4 


38 
(24) 


A A A LAL A Ae a a ee 


N3 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:09:10 VAX-11 Bliss-16 v4.1-S82 _ — 39 
PROTECTION TABLE 14-Mer-1985 13:07:35  DISKSUSER2: (MARSHALL .DEQNA)ZQNA1.BLI;4 (24) 
051 040 124 .ASCII /) 1/ 
117 040 102 “ASCII /0 B/ 
105 123 “ASCII /E S/ 
105 124 040 -ASCII /ET / 
124 117 040 -ASCII /TO / 
061 045 116 .ASCII /18N/ 
000 000 .ASCII <00><00> 
045 101 040 P.ABG: .ASCII /#A / 
122 111 040 -ASCII /RI / 
102 -ASCII /( B/ 
111 124 040 -ASCII /IT / 
1 065 040 -ASCII /15 / 
051 124 “ASCII /) T/ 
117 040 102 -ASCII /0 B/ 
105 040 123 .ASCII /E S/ 
105 124 040 ,ASCII /ET / 
124 117 040 -ASCII /T0 / 
061 045 116 .ASCII /18N/ 
000 .ASCII <00> 
045 101 040 P.ABH: .ASCII /sA / 
130 111 040 .ASCII /XI / 
050 102 ,ASCII  /( B/ 
111 124 040 -ASCII /IT / 
040 051 .ASCII /7 )/ 
040 124 117 .ASCII / 1T0/ 
040 102 105 ,ASCII / BE/ 
040 123 105 .ASCII / SE/ 
124 040 124 .ASCII /T T/ 
117 040 061 .ASCII /0 1/ 
045 116 000 “ASCII /#N/<00> 
000 .ASCII <00> 
045 101 040 P.ABI: .ASCII /#A / 
116 111 040 .ASCII /NI / 
050 040 102 “ASCII /(€ B/ 
111 124 040 “ASCII /IT / 
062 040 051 .ASCII /2 )/ 
040 124 117 “ASCII / TO/ 
040 102 105 “ASCII / BE/ 
040 123 105 ASCII / SE/ 
124 040 124 ASCII /T T/ 
117 040 061 ASCII /0 1/ 
045 116 000 CII /#N/<00> 
000 .ASCII <00> 
045 101 040 P.ABU: .ASCII /#A / 
116 111 040 .ASCII /NI / 
050 040 102 -ASCII /( B/ 
111 124 040 .ASCII /IT / 
062 040 051 ,ASCII /2 )/ 
040 124 117 “ASCII / TO/ 
040 102 105 -ASCII / BE/ 
040 122 105 -ASCII / RE/ 
123 105 124 “ASCII /SET/ 


040 124 117 -ASCII / TO/ 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-5862 Page 
PROTECTION TABLE 14-Mar-1985 13:07:35 DISK$USER2: (MARSHALL . DEQNA JZQNA1 .BLI;4 (2a) 
040 060 045 -ASCII / Os/ 
116 000 000 -ASCII /N/<00><00> 
045 101 040 P.ABK: .ASCII /#A / 
102 101 104 -ASCII /BAD/ 
103 i123 -ASCII / CS/ 
122 -ASCII /R, / 
105 130 120 -ASCII /EXP/ 
105 103 124 -ASCII /ECT/ 
105 104 -ASCII /€D/<00> 
000 .ASCII <00O> 
045 101 040 P.ABL: .ASCII /#A / 
103 i123 122 -ASCII /CSR/ 
101 104 -ASCII / AD/ 
122 075 -ASCII /R =/ 
045 117 -ASCII / #0/ 
066 045 101 -ASCII /68A/ 
040 101 -ASCII / AZ 
103 124 125 -ASCII /CTU/ 
101 114 040 -ASCII /AL / 
075 045 -ASCII /= #/ 
117 066 045 -ASCII /068/ 
101 040 040 -ASCII /A / 
105 130 120 -ASCII /EXP/ 
105 103 124 -ASCII /ECT/ 
105 104 .ASCITI / 
075 040 045 ASCII /= #&/ 
117 066 045 -ASCII /068/ 
116 000 000 -ASCII /N/<00><00> 
116 045 P.ABM: .ASCII / 
101 040 i125 -ASCII /A U/ 
116 101 102 .ASCII /NAB/ 
114 105 -ASCII /LE / 
124 117 040 -ASCII /T0 / 
122 105 123 -ASCII /RES/ 
105 124 040 -ASCII /ET / 
104 105 121 -ASCII /DEQ/ 
116 101 072 -ASCII /NA:/ 
040 101 104 -ASCII / AD/ 
122 072 040 -ASCII /R: / 
045 117 066 -ASCII /#06/ 
045 101 040 -ASCII /#A / 
103 123 -ASCII / CS/ 
122 040 075 -ASCII /R =/ 
045 117 -ASCII / #0/ 
066 045 116 -ASCII /6S8N/ 
000 -ASCII <00O> 
045 116 045 P.ABN: .ASCII /sNs/ 
101 040 127 -ASCII /A W/ 
101 111 124 -ASCII /AIT/ 
040 101 102 -ASCII _/ AB/ 
117 125 124 -ASCII /OUT/ 
040 045 104 -ASCII / #D/ 
062 045 101 -ASCII /2s8A/ 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:09:10 VAX-11 Bliss-16 v4.1-582 mY 41 | 
PROTECTION TABLE 14-Mar-1985 13:07:35  DISK$USER2:(MARSHALL .DEQNAJZQNA1.BLI;4 (24) 

040 123 105 ,ASCII / SE/ 
103 117 116 “ASCII /CON/ 
104 050 123 “ASCII /D(S/ 
051 040 055 "ASCII /) -/ 
000 “ASCII <00> 
045 116 045 P.ABO: .ASCII /sNs/ 
101 040 123 "ASCII /A S/ | 
101 116 111 "ASCII /ANI/ 
124 131 040 “ASCII /TY / 
124 111 115 “ASCII /TIM/ | 
105 122 040 "ASCII /ER / 
124 111 115 ASCII /TIM/ 
105 104 040 "ASCII /ED / 
117 125 124 II /0UT/ 
040 101 123 "ASCII / AS/ 
040 105 130 “ASCII / EX/ 
120 105 103 "ASCII /PEC/ 
124 105 104 "ASCII /TED/ 
040 045 116 “ASCII / 
000 000 -ASCII <00><00> 
045 116 045 P.ABP: .ASCII /siNs/ 
101 040 116 “ASCII /A N/ 
117 040 123 “ASCII /0 S/ 
101 116 111 “ASCII /ANI/ 
124 131 040 “ASCII /TY / 
124 111 115 “ASCII /TIM/ 
105 122 040 “ASCII /ER / 
111 116 124 “ASCII /INT/ 
105 122 122 “ASCII /ERR/ 
125 120 124 “ASCII = /UPT/ 
040 104 105 “ASCII / DE/ 
124 105 103 “ASCII /TEC/ 
124 105 104 “ASCII /TED/ 
040 045 116 “ASCII / SN/ 
000 000 -ASCII <00><00> 
045 116 045 P.ABQ: .ASCII . /sNs/ 
101 040 104 “ASCII /A D/ 
111 123 103 “ASCII /ISC/ 
117 116 116 “ASCII / 
105 103 124 “ASCII /ECT/ 

124 122 “ASCII / TR/ 
101 116 123 “ASCII /ANS/ 
103 105 111 “ASCII /CEI/ 
126 105 122 “ASCII /VER/ 
040 103 101 "ASCII / CA/ 
102 114 105 “ASCII /BLE/ 

106 122 “ASCII / FR/ 
117 115 040 “ASCII /OM / 
102 125 114 “ASCII /BUL/ 
113 110 105 "ASCII /KHE/ 
101 104 940 "ASCII /AD / | 
101 123 123 “ASCII /ASS/ 
105 115 102 "ASCII /ENB/ | 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 v4.1-582 -— 42! 
PROTECTION TABLE 14-Mar-1985 13:07:35 § DISK$USER2: (MARSHALL .DEQNAJZQNA1.BL1;4 (24) 
114 131 040 ASCII /LY / 
101 116 104 .ASCII /AND/ 
000 000 -ASCII <00><00> 
045 116 045 P.ABR: .ASCII /sNss/ 
101 040 103 ASCII /A C/ 
117 116 116 .ASCII /ONN/ 
105 103 124 .ASCII /ECT/ 
040 114 117 ASCII / LO/ 
117 120 102 .ASCII /0PB/ 
101 103 113 .ASCII /ACK/ 
040 103 117 ASCII / CO/ 
116 116 105 .ASCII /NNE/ 
103 124 117 .ASCII /CTO/ 
122 040 124 ASCII /R T/ 
117 040 102 ASCII /0 B/ 
125 114 113 ASCII /ULK/ 
110 105 101 ASCII /HEA/ 
104 040 101 .ASC 7D A/ 
123 123 105 .ASCII /SSE/ 
115 102 114 .ASCII /MBL/ 
i31 054 040 ASCII /Y, / 
124 110 105 ASCII /THE/ 
116 040 122 ASCII /N R/ 
105 124 105 ASCII /ETE/ 
123 124 045 ASCII /ST#/ 
116 000 .ASCII /N/<00> 
045 116 045 P.ABS: .ASCII /sNs/ 
101 040 104 ASCII /A D/ 
111 123 103 ASCII /ISC/ 
117 116 116 ASCII / 
105 103 124 ASCII /ECT/ 
040 102 125 ASCII / BU/ 
114 113 110 ASCII /LKH/ 
105 101 104 .ASCII /EAD/ 
040 101 123 ASCII / AS/ 
123 105 115 ASCII /SEM/ 
102 114 131 ASCII /BLY/ 
040 106 122 ASCII / FR/ 
117 115 040 ASCII /0M / 
104 105 121 -ASCII /DEQ/ 
116 101 040 ASCII /NA / 
101 116 104 .ASCII /AND/ 
040 103 117 ASCII / CO/ 
116 116 105 .ASCII /NNE/ 
103 124 000 ASCII /CT/<00> 
000 -ASCII <0OO> 
045 116 045 P.ABT: .ASCII /sNs/ 
101 040 114 ASCII /A L/ 
117 117 120 .ASCII /00P/ 
102 101 103 .ASCII /BAC/ 
113 040 103 ASCII /K C/ 
117 116 116 .ASCII /ONN/ | 
105 103 124 .ASCII /ECT/ | 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:09:10 VAX-11 Bliss-16 v4.1-582 i os 
PROTECTION TABLE 14-Mar-1985 13:07:35 § DISK$USER2: (MARSHALL .DEQNA)ZQNA1.BL1;4 retest 

117 122 040 -ASCII /OR / 
124 117 040 ASCII /TO / 
104 105 121 -ASCII /DEQ/ 
116 101 ASCII /NA,/ 
040 124 110 -ASCII / TH/ 
105 116 040 .ASCII /EN / 
122 105 124 ASCII /RET/ 
105 123 124 -ASCII /EST/ 
045 116 000 .ASCII /SN/<00> 
045 116 045 P.ABU: .ASCII /sNs/ 
101 040 103 .ASCII /A C/ 
110 105 103 .ASCII /HEC/ 
113 040 106 ASCII /K F/ 
117 122 040 .ASCII /OR / 
114 117 117 .ASCII /LO0/ 
123 105 -ASCII /SE / 
127 111 122 ASCII /WIR/ 
105 123 040 ASCII /ES / 
111 116 040 ASCII /IN / 
101 040 114 ASCII /A L/ 
117 117 120 .ASCII /00P/ 
102 101 103 -ASCII /BAC/ 
113 040 103 ASCII /K C/ 
117 116 116 .ASCII /ONN/ 
105 103 124 ASCII /ECT/ 
117 122 000 -ASCII /0R/<00> 
000 -ASCII <0Q0> 
045 116 045 P.ABV: .ASCII /siNS/ 
101 040 117 ASCII /A 0/ 
122 040 125 -ASCII /R U/ 
123 105 040 ASCII /SE / 
104 111 106 ASCII /OIF/ 
106 105 122 -ASCII /FER/ 
105 116 124 -ASCII /ENT/ 
040 114 117 ASCII / LO/ 
117 120 102 .ASCII /0PB/ 
101 103 113 ASCII /ACK/ 
040 103 117 ASCII / CO/ 
116 116 105 .ASCII /NNE/ 
103 124 117 ASCII /CTO/ 
122 054 040 ASCII oF 
124 110 105 ASCII /THE/ 
116 040 122 ASCII /N R/ 
105 124 105 ASCII /ETE/ 
123 124 045 .ASCII /ST#/ 
116 000 .ASCII /N/<00> 
045 116 045 P.ABW: .ASCII /sNs/ 
101 040 122 ASCII /A R/ 
105 120 114 -ASCII /EPL/ 
101 103 105 .ASCII /ACE/ 
040 104 105 -ASCII / DE/ 
121 116 101 .ASCII /QNA/ 

040 124 ASCII /, T/ 
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SEQ 0044 


} 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 Page 44! 
PROTECTION TABLE 14-Mar-1985 13:07:35 § DISK$USER2: (MARSHALL .DEQNAJZQNA1.BLI;4 2 c28) | 
110 105 116 .ASCII /HEN/ 
040 122 05 .ASCII / RE/ 
124 105 123 ASCII /TES/ 
124 045 116 -ASCII /TSN/ 
000 .ASCII <00> | 
045 116 045 P.ABX: .ASCII /stNs/ 
101 040 122 .ASCII /A R/ 
105 120 114 .ASCII /EPL/ 
101 103 105 .ASCII /ACE/ 
102 125 .ASCII / BU/ 
114 113 110 -ASCII /LKH/ 
105 101 104 .ASCII /EAD/ 
040 103 117 ASCII / CO/ 
116 116 105 .ASCII /NNE/ 
103 124 117 .ASCII /CTO/ 
122 040 -ASCII /R, / 
110 105 ASCII /THE/ 
116 040 122 ASCII /N R/ 
1 124 105 ASCII /ETE/ 
123 124 045 ASCII /ST#/ 
116 000 000 .ASCII /N/<00><00> 
116 045 P.ABY: .ASCII /sNs/ 
101 040 104 .ASCII /A D/ 
111 123 103 .ASCII /ISC/ 
117 116 116 .ASCII /ONN/ 
105 103 124 ASCII /ECT/ 
040 124 122 ASCII / TR/ 
101 116 123 .ASCII /ANS/ 
103 105 111 -ASCII /CEI/ 
126 105 122 ASCII /VER/ 
103 101 ASCII / CA/ 
102 114 105 ASCII /BLE/ 
040 106 122 ASCII / FR/ 
117 115 040 .ASCII /0M / 
124 122 101 .ASCII /TRA/ 
116 123 103 .ASCII /NSC/ 
105 111 126 ASCII /€IV/ 
105 122 000 -ASCII /ER/<00> 
000 .ASCII <O0O> 
045 116 045 P.ABZ: .ASCII /sNs/ 
101 040 101 ASCII /A A/ 
116 104 040 ASCII /ND / 
103 117 116 .ASCII /CON/ 
116 105 103 .ASCII /NEC/ 
124 040 111 ASCII /T I/ 
124 040 124 ASCII /T T/ 
117 040 114 ASCII /0 L/ 
117 117 120 .ASCII /00P/ 
102 101 103 -ASCII /BAC/ 
113 040 103 ASCII /K C/ 
117 116 116 .ASCII /ONN/ 
105 103 124 .ASCII /€CT/ 
117 122 040 -ASCII /OR / | 
: 
| 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 yoy as! 
PROTECTION TABLE 14-Mar-1985 13:07:35 DISK$USER2: [MARSHALL .DEQNA)]ZQNA1. BLI;4> (24) | 
101 116 104 .ASCII /AND/ 
040 102 125 ASCII / BU/ 
114 113 110 ASCII /LKH/ 
105 101 104 .ASCII /EAD/ 
101 123 ASCII / AS/ 
123 105 115 .ASCII /SEM/ 
102 114 131 -ASCII /BLY/ 
045 116 000 .ASCII /#N/<00> 
045 116 045 P.ACA: .ASCII /sNss/ 
101 040 122 ASCII /A R/ 
105 120 114 ASCII /EPL/ 
101 103 105 .ASE€II /ACE/ 
040 124 122 ASCII / TR/ 
101 116 123 -ASCII /ANS/ 
103 105 111 ASCII /CEI/ 
126 105 122 .ASCII /VER/ 
040 103 101 ASCII / CA/ 
102 114 105 ASCII /BLE/ 
054 040 124 ASCII /, T/ 
110 105 116 ASCII /HEN/ 
040 122 105 ASCII / RE/ 
124 105 123 ASCII /TES/ 
124 045 116 ASCII /TSN/ 
000 .ASCII <00O> 
045 116 045 P.ACB: .ASCII /sNs/ 
101 040 122 .ASCII /A R/ 
105 120 114 ASCII /EPL/ 
101 103 105 -ASCII /ACE/ 
040 124 122 ASCII / TR/ 
101 116 123 .ASCII /ANS/ 
103 105 111 ASCII /CEI/ 
126 105 122 ASCII /VER/ 
054 040 124 ASCII /, T/ 
110 105 116 ASCII / 
122 105 ASCII / RE/ 
124 105 123 ASCII /TES/ 
124 045 116 ASCII /TSN/ 
000 -ASCII <OQO> 
045 116 045 P.ACC: .ASCII /sNs/ 
101 040 122 ASCII /A R/ 
105 114 ASCII /EPL/ 
101 103 105 ASCII /ACE/ 
040 124 110 ASCII / TH/ 
105 106 ASCII /E F/ 
125 123 105 .ASCII /USE/ 
040 111 106 ASCII / IF/ 
040 102 101 ASCII / BA/ 
104 054 040 ASCII /D, / 
124 110 105 ASCII /THE/ 
116 040 122 ASCII /N R/ 
105 124 105 ASCII /ETE/ 
123 124 045 ASCII /ST#/ 
116 000 .ASCII /N/<00> | 
| 
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CZQNADO DEQNA FUNCTIONAL TEST 


PROTECTION TABLE 


P.ACD: 


P.ACE: 


P.ACF: 


“ASCII 
“ASCII 


H4 


14-Mar-1985 13:09:10 
14-Mar-1985 13:07:35 


ba —— a 
a ee LE 


SEQ 004 
VAX-11 Bliss-16 V4.1-582 hae 46 
DISK $USER2: (MARSHALL .DEQNAJZQNA1.BLI;4 (24) 
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PROTECTION TABLE 


117 040 114 
117 116 107 
045 116 

045 116 045 
101 124 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:09:10 


14-Mar-1985 13:07:35 
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SEQ 0047 


VAX-11 Bliss-16 V4.1-582 Page 
DISK $USER2: (MARSHALL .DEQNA)ZQNA1.B8L1;4 


(24) 


re er rr = 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 “are « 48 ° 
PROTECTION TABLE 14-Mar-1985 13:07:35 DISK$USER2: : (MARSHALL . DEQNA)ZQNA1. BLI;4" (24) | 
124 054 -ASCII /€T,/ | 
124 131i -ASCII / TY/ 
105 (040 “ASCII /PE / | 
116 131 .ASCII /ANY/ 
103 110 -ASCII / CH/ 
122 101 -ASCII /ARA/ 
124 105 -ASCII /CTE/ 
040 124 -ASCII /R T/ 
040 105 -ASCII /0 E/ 
111 124 ASCII /XIT/ | 
122 -ASCII / FR/ 
115 040 -ASCII /0M / 
105 i23 -ASCII /TES/ 
116 ASCII /TSN/ | 
000 -ASCII <00><00> 
116 045 P.ACN: .ASCII /Ns/ 
040 124 -ASCII /A T/ 
122 040 -ASCII /OR / 
101 114 -ASCII /VAL/ 
105 040 .ASCII /UE / 
123 040 .ASCII /IS / 
i121 125 -ASCII /EQU/ 
114 -ASCII /AL / 
117 040 -ASCII /T0 / 
105 122 -ASCII /ZER/ 
040 045 -ASCII /0 #/ 
000 000 -ASCII /N/<00><00> 
116 045 P.ACO: .ASCII /Ns/ 
045 101 -ASCII /NSA/ 
055 055 ASCII /---/ 
055 055 -ASCII /---/ 
055 .ASCII /---/ 
055 055 -ASCII /---/ 
055 -ASCII /---/ 
055 055 ASCII /---/ 
055 055 ASCII /---/ 
055 055 . ASCII f- = -f 
055 055 -ASCII /---/ 
055 055 a ASCII 4- ad -f 
055 055 ASCII /---/ 
os5 055 ASCII /---/ 
055 055 -ASCII /---/ 
055 055 -ASCII /---/ 
055 055 -ASCII /---/ 
055 055 -ASCII /---/ 
055 055 -ASCII /---/ 
055 055 -ASCII /---/ 
055 055 "ASCII. /---/ | 
055 -ASCII /---/ 
055 055 -ASCII /---/ | 
055 045 -ASCII /--#/ 
000 -ASCII /N/<00O> 
116 045 P.ACP: .ASCII /sNs/ | 


~_— rr ee 


SEQ 0049 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:09:10 VAX-11 Sliss-16 V4.1-582 Page 49° 
PROTECTION TABLE 14-Mer-1985 13:07:35 DISK$USER2: (MARSHALL .DEQNAJZQNA1L.BLI;4 (24) 
101 040 102 .ASCII /A B/ 
101 104 040 -ASCII /AD / 
103 123 122 -ASCII /CSR/ 
054 040 102 -ASCII /, B/ 
111 124 123 -ASCII /ITS/ 
040 i123 124 -ASCII / ST/ 
125 103 113 .ASCII /UCK/ | 
101 124 -ASCII / AT/ 
040 060 072 -ASCII / 0:7 
045 116 000 -ASCII /#N/<00> 
000 -ASCII <0OO> 
045 116 045 P.ACQ: .ASCII /sNs/ | 
101 040 102 -ASCII /A B/ 
101 104 040 -ASCII /AD / | 
103 i123 122 -ASCII /CSR/ 
054 040 102 -ASCII /, B/ 
111 124 123 -ASCII /ITS/ | 
040 i123 124 .ASCII / ST/ 
i125 103 113 -ASCII /UCK/ 
040 101 124 -ASCII / AT/ 
040 061 072 -ASCII / 1:7 
045 116 000 -ASCII /#N/<00> 
000 -ASCII <00O> 
045 116 045 P.ACR: .ASCII /sNs/ 
101 040 123 -ASCII /A S/ 
117 106 124 -ASCII /OFT/ 
127 101 122 -ASCII /WAR/ 
105 040 122 -ASCII /E R/ 
105 i123 105 -ASCII /ESE/ 
124 040 125 -ASCII /T U/ 
116 101 102 - ASCII / 
114 105 040 ASCII /LE / 
124 117 040 ASCII /T0 / 
103 114 105 -ASCII /CLE/ 
101 122 040 -ASCII /AR / | 
103 123 122 -ASCII /CSR/ 
040 123 124 -ASCII / ST/ 
101 124 111 ASCII /ATI/ 
103 040 102 -ASCII /C B/ 
111 124 123 -ASCII /1ITS/ 
072 045 116 ASCII /:8N/ 
000 000 -ASCII <00><00> 
045 116 045 P.ACS: .ASCII /sNe/ 
101 040 102 -ASCII /A B/ 
101 104 040 ASCII /AD / 
123 124 101 -ASCII /STA/ 
124 111i 117 -ASCII /TIO/ 
116 040 101 -ASCII /N A/ 
104 104 122 -ASCII /DDR/ 
105 123 123 .sSCII /€SS/ 
103 110 -ASCII / CH/ 
105 103 113 -ASCII /ECK/ 
123 125 115 .ASCII /SUM/ 
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CZONADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10  VAX-11 Bliss-16 v4.1-582 “lie se 
PROTECTION TABLE 14-Mar-1985 13:07:35  DISK$USER2: (MARSHALL .DEQNA)ZQNA1.BLI:4> (24) 
072 040 101 -ASCII /: A/ 
103 124 040 -ASCIZ /CT / 
075 040s«éS "ASCII. 7: 97 
117 066 045 -ASCII /06s8/ 
101 040—=S«:105 "ASCII. 7A E/ 
130 120 040 ASCII /xXP / 
075 0408S "ASCII /= #/ 
117 066 045 ASCII /06s/ 
116 000 ~=—-000 "ASCII /N/<00><00> 
045 116 045 P.ACT: .ASCII /sNs/ 
101 040 ~=—«:102 "ASCII. 7A B/ 
101 104 -ASCII /AD / 
123 124 101 -ASCII /STA/ 
124 111 117 -ASCII /TIO/ 
116 040 101 -ASCII /N A/ 
104 —:108-~—Ss«sae "ASCII /D0R/ 
105 123 123 -ASCII /€SS/ 
072 040 000 -ASCII 7/7: /<00O> 
000 -ASCII <00O> 
045 116 045 P.ACU: .ASCII /sNs/ 
101 040 102 -ASCII /A B/ 
101 104 040 "ASCII AD / 
104 105 121 -ASCII /DEQ/ 
116-102 "ASCII 
111 057 117 ASCII /1/<57>/0/ 
040 120 101 ‘. II 
107 105 040 "ASCII /GE / 
122 105 107 "ASCII /REG/ 
111 -:123—St—s«2 "ASCII /IST/ 
105 122 072 -ASCII /ER:/ 
045 116 000 "ASCII /N/<00> 
045 4016 s«éS P.ACV: ASCII /#Ns/ 
101 040 ~=—«:102 "ASCII 7A B/ 
101 104 040 -ASCII /AD / 
103 = 123—S—«*22D "ASCII /CSR/ 
040 ©1058 "ASCII. 7, E/ 
130 120 105 ‘ II /xXPE/ 
103 124 Ss«105 "ASCII /CTE/ 
104 «= 040—é 2D "ASCII. 7D R/ 
114 040 050 -ASCII /t (/ 
040 102 2 111 "ASCII. 7 BI/ 
124 065 ‘ASCII /T 5/ 
040 051 ~—s(0a0 "ASCII 7) 7 
124 117 040 -ASCII /T0 / 
102 105 040 -ASCII /B8E / 
123 105 124 ASCII /SET/ 
i817 "ASCII. 7 TO/ 
040 060 045 -ASCII / On/ 
116 C00 000 -ASCII /N/<00><00> 
045 416 045 P.ACW: .ASCII /sNe/ 
101 040 102 -ASCII /A B/ 
101 104 040 -ASCII /AD / 
102 «0S7—s«éi208 "ASCII. /B/<57>/D/ 





. ——— EE ac 





CZQNADO DEGNA FUNCTIONAL TEST 
PROTECTION TABLE 


045 


mm ee _ . —_————— ——— 


M4 


14-Mer-1985 13:09:10 


14-Mer-1985 13:07:35 


-A 
P.ACX: .ASCII /sNs/ 
. ASC 


.ASC 
P.ACY: .ASCII /sNe/ 
. ASC 


SEQ ne 


VAX-11 Bliss-16 V4.1-582 


DISKSUSER2; [MARSHALL .DEQNAJZONA1.BL1,2° 


Si 
(24) 


—_—_— tt <a 


— = —_— ew ee ee 





CZQNADO DEGNA FUNCTIONAL TEST 
PROTECTION TABLE 


117 066 ASCII 
101 040 ASCII 
130 120 ASCII 
114 105 ASCII 
040 075 ASCII 
045 117 ASCII 
045 116 ASCII 
-ASCIT 

116 045 P.ACZ: .ASCII 
040 122 -ASCITI 
107 111 ASCII 
124 105 -ASCII 
040 106 ASCII 
111 114 .ASCII 
104 .ASCIT 
117 040 .ASCII 
105 123 ASCII 
117 116 ASCII 
040 101 ASCII 
040 101 ASCII 
104 122 ASCII 
123 123 ASCII 
040 040 ASCII 
117 066 ASCII 
116 000 ASCII 
.ASCII 

116 045 P.ADA: .ASCII 
040 102 .ASCIT 
104 040 ASCII 
122 101 ASCII 
123 115 ASCII 
124 040 II 
124 101 ASCII 
125 123 -ASCII 
124 -ASCII 

117 040 ASCII 
101 116 ASCII 
040 103 ASCII 
114 114 ASCIT 
123 111 ASCII 
116 123 ASCII 
116 000 ASCIT 


.PSECT 
RCV.O.LIST:: 
-BLKW 
XMIT.D.LIST: 
.BLK W 
RCV. BUFFER: : 
BLKW 
XMIT. BUFFER: : 


N4 


14-Mer-1985 13:09:10 
14-Mer-1985 13:07:35 


/%N/<00> 


$GLOB$, OD 


SEQ ane 


VAX-11 Bliss-16 V4.1-582 


DISK $USER2: [MARSHALL . DEQNA)ZQNA1. e.t,s™ 


S2 
(24) 





ee hi TL 


CZQNADO DEQNA FUNCTIONAL TEST 
PROTECTION TABLE 


.BLKW 2000 
PHYS .ADR: : 

.BLKW 13 
SETUP .BUFFER: : 

-BLKW 400 
IOP. TABLE: : 


-BLKW 10 
ETH.STATION.ADR: : 

.BLKW 6 
STATION.ADR: : 


BS 


14-Mer-1985 13:09:10 
14-Mer-1985 13:07:35 


SE 
VAX-11 Bliss-16 V4.1-582 oy 5 
DISK S$USER2: [MARSHALL .DEQNAJZQNA1.BL1;4 (24) 


ee ee 
——_—_—_— 


- a TT TT TT ——_— 


CS 





SEQ 0054_~—CC 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 Page 54° 
PROTECTION TABLE 14-Mar-1985 13:07:35 DISK$USER2: (MARSHALL .DEQNAJZQNA1.BL1;4 (24)! 
BYTE 372 | 
BYTE 104 
BYTE 104 | 
BYTE 125 | 
BYTE 252 
BYTE 0 
BYTE 0 
BYTE 0 
.BYTE 0 ! 
BYTE 0 
.BYTE 252 
.BYTE 0 
.BYTE 2 
BYTE 252 
BYTE 252 
.BYTE 252 
BYTE 252 
BYTE 
.BYTE 125 
.BYTE 125 
.BYTE 125 
.BYTE 252 
.BYTE 0 
.BYTE 4 
.BYTE 377 
.BYTE 377 
.BYTE 377 
.BYTE 252 
.BYTE 0 
.BYTE 0 
.BYTE 0 
.BYTE 0 
.BYTE 252 
.BYTE 0 
.BYTE 4 
.BYTE 30 
.BYTE 201 
.BYTE 30 
.BYTE 1 
.BYTE 0 
.BYTE 0 
BYTE 0 
.BYTE 0 
.BYTE 0 
.BYTE 253 
.BYTE 252 
.BYTE 252 
“BYTE | 
BYTE 252 
.BYTE 252 
.BYTE 377 | 
| 





<del, a a 


DEQNA FUNCTIONAL TEST 


CZQNADO 
PROTECTION TABLE 


TO16:: 


SSSSSSSSS5555555 


DS 


14-Mer-1985 13:09:10 
14-Mar-1985 13:07:35 


Pes Hee > 
vi 


XMIT . BUFFER 
- 2000 


0 

0 

- 100000 
20000 
0 

0 


—V— ——— ee ~~ ee Se ee 


VAX-11 Bliss-16 V4.1-582 


55 
DISK$USER2: [MARSHALL .DEQNAJZQNA1.BLI;4~ (24) 


SE@ 0055 
P 


oo eel 
———— —SSo 


meee 





_— — fw —_— eee 


CZQNADO DEQNA FUNCTIONAL TEST 
PROTECTION TABLE 


TO13:: 


SOGSSEEE SESSGSSSSSSSSSRSSSSSSS55555559595 50555055885 


ES 


14-Mer-1985 13:09:10 
14-Mer-1985 13:07:35 


600 
ee 


0 
0 
- 100000 


- 77500 
= 


0 

0 

- 100000 
-77700 
ee. 


0 
0 
- 100000 


-60000 
—— 


0 
0 
- 100000 


20000 
— 


0 

0 

- 100000 

- 100000 
XMIT.D.LIST+70 


-1 
—— 


0 
0 
- 100000 
- 100000 


VAX-11 Bliss-16 V4.1-582 
DISK $USER2: [MARSHALL . DEQNAJZQNA1. 


SEQ a « 
Page 
BLI;4 P+: 


| 
| 


—_—- ee ee 


A LLL AE LE A OL OE ° 
EE ES 


ne mmm 


a 


SE 7 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 “Pese 5 7! 
PROTECTION TABLE 14-Mar-1985 13:07:35 DISK $USER2: (MARSHALL .DEQNA)ZQNA1.BLI;4 3 

.WORD XMIT.BUFFER+2 

.WORD -177 

.WORD 0 

.WORD 0 

.WORD -100000 , 

.WORD -100000 

.WORD XMIT.BUFFER+400 

WORD -1 

WORD 0 

WORD 0 

.WORD -100000 

.WORD 40000 

.WORD XMIT.D.LIST+60 

.WORD -1 

.WORD 0 

.WORD 0 

.WORD -100000 

.WORD -60000 

.WORD XMIT.BUFFER+402 

WORD -77 

.WORD 0 

.WORD 0 

.WORD -100000 

.WORD 20000 

.BLKB 4 

RD13:: 

.WORD -100000 

WORD  -100000 

.WORD RCV.BUFFER 

-WORD -1 

WORD 0 

.WORD 0 

.WORD -100000 

.WORD -100000 

-WORD RCV.BUFFER+2 

-WORD - 

WORD 0 

-WORD 0 

.WORD  -100000 

.WORD -100000 

.WORD RCV.BUFFER+176 

.WORD -i 

.WORD 0 

-WORD 0 

.WORD  -100000 

.WORD -100000 

-WORD RCV.BUFFER+200 

.WORD -2 

.WORD 0 

-WORD 0 

.WORD -100000 

.WORD -100000 

.WORD RCV.BUFFER+204 








i LE 


DEQNA FUNCTIONAL TEST 


CZQNADO 
PROTECTION TABLE 


aie 


- FP FP FP ee ee 


GS 


14-Mar-1985 13:09:10 
14-Mar-1985 13:07:35 


-74 
0 


0 

-100000 

- 100000 
ee 


0 

0 

- 100000 

-40000 
oo 
0 
0 

- 100000 

- 100000 
—— 
0 

0 

- 100000 

- 100000 

RCV .BUFFER+406 
-74 

0 

0 

- 100000 

- 100000 

RCV. BUFFER+576 


0 
- 100000 
20000 


p 


ee ee 


SEQ ae 


VAX-11 Bliss-16 V4.1-582 


DISK$USER2: [MARSHALL .DEQNA)ZQNA1. BLI; = Cae 


(28) 


| 


cece EL LL LLL LLL LL LLL LA LLL Ne 
A TT TS TT 


H5 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 Sn’ 
PROTECTION TABLE 14-Mer-1985 13:07:35  DISK$USER2:(MARSHALL .DEQNAJZQNA1.BL1;4 (24) 


i ° 


E 
> 
° 
Az 
= 
PRR RRR eRe heheheh tb OO OC OF FF Fe Fe ee 


-GLOBL L$SOFT, TSPTHV, L$RPT, L$INIT 
-GLOBL LS$CLEAN, L$LAST, L$HARD, L$DVTYP 
-GLOBL L$DESC, L$DU, LSAU, L$AUTO, Tl 
-GLOBL T2, T3, 14, T5, T6, 17, T8, T9 
-GLOBL 110, Til, Tie, T13, 114, T15, 116 
-GLOBL 117, 118, 1719, T20, Tel 





IS 


| SEQ 0060 


i 
j 
ZQNA1 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 Page 60! 
v01.0 PROTECTION TABLE 14-Mar-1985 13:07:35 DISK$USER2: (MARSHALL .DEQNAJZQNA1.BLI;4 (24) | 
j 
| 
100000 BITiS== - 100000 | 
040000 BIT14== 40000 
020000 BIT13== 20000 , 
010000 BITi2== 10000 
004000 BITii== 4000 | 
002000 BIT10== 2000 
001000 BITO9== 1000 
000400 BITO8== 400 | 
000200 BITO7== 200 
000100 BIT06== 100 
000040 BITOS== 40 
000020 BIT04== 20 
000010 BITO3== 10 
000004 BITO2== 4 
000002 BITO1== ° 
000001 BITOO== 1 
001000 BIT9== 1000 
000400 BITB== 400 
000200 BIT7== 200 
000100 BIT6== 100 
000040 BITS== 40 
000020 BIT4== 20 
000010 BIT3== 10 
000004 BIT2== 4 
000002 BITi== 2 
000001 BITO== i 
000040 EF .START== 40 
000037 EF .RESTART== 37 
000036 EF .CONTINUE== 36 
000035 EF .NEW== 35 
000034 EF .PWR== 
000340 PRIO7== 340 
000300 PRI06== 300 
000240 PRIOS== 240 
000200 PRIO4== 
000140 PRIO3== 140 
000100 PRIO2== 100 
000040 PRIO1== 40 
000000 PRI00== 0 
EVL== 4 
000010 LOT== 10 
000020 ADR== 20 
0 IDu== 40 
000100 ISR== 100 
UAM== 200 
000400 BOE== 400 
001000 PNT== 1000 
PRI== 2000 | 
004000 IXE== 4000 
010000 IBE== 10000 
020000 IER== 20000 | 
| 
| 
| i 
| 


Vani 


A A Ee ee 
———w ee er ee ee  — ——— a _— -_—_ 


JS | 


i 
| SEQ 0061S 
' ZQNAL CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:09:10 VAX-11 Bliss-16 V4.1-582 Pp 
_V01.0 PROTECTION TABLE 14-Mar-1985 13:07:35 DISK$USER2: [MARSHALL .DEQNAJZQNA1.BLI;4~ (2a) | 
} 
040000 LOE== 40000 
100000 HOE == - 100000 
000176’ LSERRTBL== ERRTYP | 
000220° L$SW== L$SWLEN+2 
000210' L$HW== L$HWLEN-2 
000011° L$DEPO== LSREV+1 
000000’ DESCR.LIST== RCV.O.LIST | 
000400’ DATA. BUFFER== RCV. BUFFER 
000000’ QSTOi== P.AAA | 
000030’ QST02== P.AAB | 
000060’ Q@STO3== P.AAC 
000122’ QST04== P. AAD 
000164’ QSTOS== P.AAE 
000226 ' QST06== P. AAF 
000270' QSTO7== P.AAG 
000332’ MSGOO== P.AAH 
000370’ MSGO1== P. AAI 
000452’ MSGO2== P. AAJ 
000540 MSGO3== P, AAK 
’ MSGO4== P.AAL 
000736’ MSGOS== P.AAM 
001030’ MSGO6== P.AAN 
001122’ MSGO7== P.AAO 
001214’ MSGO8== P. AAP 
001306' MSGO9== P.AAQ 
001400' MSG10== PAAR 
001462: MSGli== P.AAS 
1546’ MSGi2== P.AAT 
001612 MSG13== P. AAU 
001676’ MSG14<= P. AAV 
001766' MSGi5== P. AAW 
2050’ MSG16== P. AAX 
002136' MSG17== P. AAY 
002224’ MSG18== P.AAZ 
250° MSG19== P.ABA 
002336' MSG20== P. ABB 
002426 ' MSG2i== P. ABC 
‘ MSG22== P. ABD 
002572' MSG23-= P. ABE 
002650’ MSG24== P. ABF 
002724' MSG25== P.ABG 
002766’ MSG26== P. ABH 
003030' MSG27== P.ABI 
003072: MSG28== P.ABU 
003136’ MSG29== P. ABK 
003164’ MSG30== P. ABL 
MSG31== P. ABM 
003336’ MSG32== P. ABN | 
3400' MSG33== P. ABO 
003454’ MSG34== P. ABP 
003530’ MSG35== P.ABQ 
MSG36== P. ABR 
003732' MSG37== P.ABS 


——— 


ee es ee ee -_ 
— = ee « | er a ee ne te - 


' ZQNA1L CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:09:10 VAX-11 Bliss-16 V4.1-S582 “ey 62 
| eee PROTECTION TABLE 14-Mar-1985 13:07:35 DISK$USER2: [MARSHALL .DEQNA)ZQNA1.BLI;4 (24). 
004024’ MSG38== P.ABT | 
004104’ MSG39== P. ABU | 
004170’ MSG40== P. ABV 
004260’ MSG41== P, ABW 
004322’ MSG42== P.ABX : 
004402’ MSG43=<= P.ABY 
004466' MSG44== P.ABZ 
004570’ MSG45== P.ACA 
004646’ MSG46== P.ACB 
004716' MSG47== P.ACC 
004772' MSG48== P.ACD 
005030’ MSG49== P.ACE 
005066’ MSG50-= P.ACF 
005150’ MSG5Si== P.ACG 
005202’ MSGS2== P.ACH 
005246 ' MSG53== P.ACI 
005276' MSG54== P.ACJ 
005346' MSGS55== P.ACK 
005410' MSG56== P.ACL 
005446 ' MSG57== P.ACM 
005536’ MSG58== P.ACN 
005602’ MSGS9== P.ACO 
005714' MSG60== P.ACP 
005756 ' MSG61== P.ACQ 
006020' MSG62== P.ACR 
006110’ MSG63== P.ACS 
006204' MSG64== P.ACT 
006240' MSG65== P.ACU 
304' MSG66-= P.ACV 
006372' MSG67== P. ACW 
006474' MSG68== P.ACX 
006572’ MSG69-= P.ACY 
006672' MSG70== P.ACZ 
006756' MSG71== P.ADA 
000210' HP. TABLE== L $HWLEN+2 
000220' SP. TABLE== LS¢SWLEN+2 
; PSECT SUMMARY 
: 
; Psect Neme Words Attributes 
: $CODE $ 81 RO. I , LCL. REL. CON 
: $PLIT$ 1807 We. 8. ts Wi. Te 
'3 Librery Stetistics 
: 
ee) ek er oe eee ee meme ee Symbols -------- Pages Processing 
: File Totel Loaded Percent Mapped Time 


LS 


ZQNA1 CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:09:10 
v0o1.0 PROTECTION TABLE 14-Mer-1985 13:07:35 
3 
s DISKSUSER2: (MARSHALL .DEQNA )JQNALIB.L16;15 
: 223 88 39 14 
$ COMMAND QUALIFIERS 
$ BLISS/PDP11 ZQNA1.BLI/LIST=ZQNA1 .LIS/OBJECT=ZQNA1 . OBJ/SOURCE =PAGE : 53 
Size: 0 code + 4610 date words 
Run Time: 00:23.8 


Elapsed Time: 01:12.3 
Lines/CPU Min: 6123 
al 38814 
ears Used: 230 pages 
Compilation Complete 


a ES LS - me e+ ee Ce ee re 
a A SE 


VAX-11 Bliss-16 V4.1-582 


63 
DISK$USER2: (MARSHALL . DEQNA JZQNA1. eL1,8° (20) 


00:00.1 


ear” 0063 


ee 
ee ES SE 


—— = 


mE ET ES A NT SRN ye em 


-_—__— - 


wee OOO°CCo 


—_— > .--—<-s ae a 


CZQNADO DEQNA FUNCTIONAL TEST 


MODULE ZQNA2 a be ey DEQNA FUNCTIONAL 
ADDRESSING _ MODE ( ABSOLUTE ) 

SSBTTL * PROGRAM INIT MODULE ‘ 

BEGIN 


LIBRARY ‘QNALIB' ; 
REQUIRE ‘BLSMAC.REQ’ ; 


——— SS —— oe Pee - —- ————— 


M5 


SEQ 0064 
14-Mar-1985 13:10:29 VAX-11 Bliss-16 v4.1-582 Page 
14-Mer-1985 13:04:24  DISKSUSER2: (MARSHALL .DEQNA)ZQNA2.BLI;4 


TEST’ 


! QNALIB LIBRAR 
! DIAGNOSTIC SUPERVISOR LIBRARY 


em ae SE ERS SL RN moe-anD ly - 


1 
(1?) 


—— ——— — | 


R— Se - — —< 


bb be be be be ee ee be 


NS 


DEQNA FUNCTIONAL TEST 14 -Mer - 1985 3 710: 5 


EXTERNAL DECLARATIONS 14-Mar-1985 


SSBTTL ‘EXTERNAL DECLARATIONS‘ 
* <BLF /FORMAT > 


PSECT 
CODE = AASCODES; 
FORWARD ROUTINE 
NXM_INT : LSISR NOVALUE; 


EXTERNAL ROUTINE 
RESET _DEQNA : NOVALUE; 


VAX-11 Bl; 
DISK SUSER2: 


SEQ 0065 
-16 v4.1-5862 Page 
MARSHALL . DEQNA )ZQNA2 .6L1;4 


é 
(2) 


— <<, ame -_ 


=. «4 


— ee lieeerteernataemetinaetn ate eae ae 


See 
’ 
o 


~ 
$ 
Be tee te Be ee ee Be ee he ee be ee be be he ee ee ee ee ee ee ee ee ee ee ee fe ee ee he Be bee he ee ee ee ee be ee ee ee eo ee bee 


A ST 


CZQNADO DEQNA FUNCTIONAL TEST 
EXTERNAL DECLARATIONS 


EXTERNAL 


COMMUNICATION AREA DECLARATIONS 


I? TRAE : VECTOR { 8, WORD J, 


HARDWARE AND SOFTWARE P-TABLE STORAGE DECLARATIONS 


HWP_TABLE =: REF BLOCK ( HWP_SIZE, WORD ] FIELD ( HWP_FIELDS ), 
SWP_TABLE : REF BLOCK [ SWP_ SI7e. WORD ) FIELD ( SWP_FIELDS ), 


INTERRUPT _FLG : WORD, ! 1 = INTERRUPT OCCURED 
REG_ADR : REF REG_STR FIELD ( IOP_FIELOS ), 
IOP _DATA : REF REG_STR FIELD ( IOP_FIELOS ), 

: REF ADR_STR FIELD ( IOP_FIELDS ), 


TEMPORARY STORAGE DATA DECLARATIONS 


I/O PAGE REGISTER ADDRESS 


TMP _IOP_ADR : WORD, : 

TMP _REG_DATA : WORD, ! 1/0 PAGE REG CONTENTS 
TEMP1 : WORD, ! TEMPORARY STORAGE LOCATION 
TEMP2 : WORD, ! TEMPORARY STORAGE LOCATION 
TEMPS : WORD, ! TEMPORARY STORAGE LOCATION 
TEMP4 : WORD, ! TEMPORARY STORAGE LOCATION 
TEMPS : WORD, ! TEMPORARY STORAGE LOCATION 
TEMP6 : WORD, ! TEMPORARY STORAGE LOCATION 
TEMP7 : WORD, ! TEMPORARY STORAGE LOCATION 
TEMPS : WORD, ! TEMPORARY STORAGE LOCATION 
TEMPS WORD, ! TEMPORARY STORAGE LOCATION 


QUESTIONS AND ERROR MESSAGEES DECLARED EXTERNALLY 


QSTO1, QSTO2, QSTO3., QSTO4, QSTOS, QSTO6, QSTO7, MSG54; 


14-Mer-1985 13:10:29 VAX-11 Bliss-16 V4.1-562 Pege 3 
14-Mar-1985 13:04:24  DISK$USER2: (MARSHALL .DEQNA)ZQNA2.BL1;4 (3) 


= —— = = = _ = =| eer ence ee ee er eee NN 


SEQ 0066 


LL ee 


<N 


> he be bee bee ee ee be bee ee ee fee bee ee ew 


- —_ OO OOwrwrrOO Or or oe 


C6 


14-Mar-1985 13:10:29 
14-Mar-1985 13:04:24 


CZQNADO DEQNA FUNCTIONAL TEST 
TYPE AND DESCRIPTION 


SSBTTL ‘TYPE AND DESCRIPTION’ 


See 


: NAMES OF DEVICES SUPPORTED BY PROGRAM 


EQUALS; 
DEVTYP (#ASCIZ' DEQNA/M7504' ); 


TEST DESCRIPTION 


DESCRIPT (sASCIZ'DEQNA FUNCTIONAL TEST’); 


—--~-— -— — ——— — = - — -_——_ --— 


SEQ 0067 
VAX-11 Bliss-16 V4.1-582 Page 
DISK $USER2: [MARSHALL .DEQNA]ZQNA2.BL1;4 


4! 
(4) 


——< 


A i es i 


un 
@ 
vi 
be ee he be be he ee bee be be be bee be ee fee ee ee be ee ee ee 


—_————— 


D6 


CZQNADO DEQNA FUNCTIONAL TEST 
HARDWARE PARAMETER CODING SECTION 


SSBTTL ‘HARDWARE PARAMETER CODING SECTION’ 


ca 
a 


THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 


THIS CODE IS USED BY THE SUPERVISOR TO INTERROGATE THE OPERATOR 
FOR DEVICE INFORMATION TO PUT IN THE P-TABLE. THIS CODE IS USED 
IN CONJUNCTION WITH THE DEFAULT P- caeaae - gece THE MACROS 
USED IN THIS SECTION ARE “GPRMD", "GPRMA 


+ 
+ 


ie 


14-Mar-1985 13:10:29 VAX-11 Bliss-16 V4.1-582 Pege 5 
14-Mar-1985 13:04:24 DISK $USER2: [MARSHALL . DEQNAJZQNA2. BLI;4 (5) 


; 

CQSTO1, #0'O’, O, #0'174440', #0'174460', YES, 1); ! I/0 PAGE ADDRESS ? 
CQ@STo02, #0'2', 0, #0'700', #0'704', YES, 1); ! INTERRUPT VECTOR ADDR ? 
H 


— — ee + 


SEG 0068 


eee 


| 
! 
| 


g 
ee be be fe be ee Be ee ee ee fee ee he bee bee ee ee ee be fee he be bee ee bee 


—_ = . ——————— --——- —- see rr ee rr ee _——— -_—— — 


E6 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:10:29 VAX-11 Bliss-16 V4.1-562 ~—o 
SOFTWARE PARAMETER CODING SECTION 14-Mar-1985 13:04:24 DISK$USER2: (MARSHALL .DEQNAJZQNA2.BL1;4 (6) 


SSBTTL ‘SOFTWARE PARAMETER CODING SECTION’ 


oO 


' 

: THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 

$ THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
: MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
: INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
: 

: 


——_— = 


MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERAT 
BGNSFT; 
GPRML ( QSTO3, #0'0', -1, YES, 1); ! DO YOU WANT TO TEST SANITY TIMER ? 
XFERF (NOTIMER) ; 
GPRMD ( QSTOS, #0'4', D, -1, ©, 7, YES, 1); 
' SANITY TIMER TIME-OUT VALUE ? 
$LCNOTIMER) ; 
GPRML ( QSTO6, s0’6', -1, YES, 1); 1 EXTERNAL LOOPBACK MODE ? 
GPRML ( QSTO7. #0'10', -1. YES. 1); 1 SYSTEM HAS BLOCK-MODE MEMORY ? 
GPRML ( QSTO4. #0'2', -1, YES, 1); | LOOPBACK CONNECTOR IN DEQNA ? 
ENDSFT; 


me en eae tee ee 


eS 
me ae 


oe SF Ge Se oe Ge Ge G2 Ge Ge Ge Ge Gs GF Se es Be Ge ee ee Ge ce 
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CZQNADO DEQNA FUNCTIONAL TEST 
REPORT CODING SECTION 


F6 


14-Mar-1985 13:10:29 
14-Mar-1985 13:04:24 


SSBTTL ‘REPORT CODING SECTION’ 
See 
2 
: THE REPORT CODING SECTION CONTAINS THE 
“PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS. 
H THIS SECTION CONTAINS THE CODE FOR PRINTING 
H STATISTICAL INFORMATION GATHERED BY THE DIAGNOSTIC. IT IS 
: EXECUTED BY THE OPERATOR COMMAND “PRINT” OR BY THE MACRO CALL 
: “DORPT". USE THE PRINTS MACRO TO PRINT THE INFORMATION. 
: USE FORMAT STATEMENTS AS IN THE PRINTB/PRINTX MACROS. IT IS 
: THE PROGRAMMER'S RESPONSIBILTY TO DEVISE AND IMPLEMENT THE 
FORM AND CONTENT OF THE STATISTICS. 
BGNRPT ; 
TEMP1 = 1; 
ENDRPT ; 
-TITLE ZQNA2 CZQNADO DEQNA FUNCTIONAL TEST 
-IDENT /V01.0/ 
-ENABL AMA 
-PSECT $CODE$, RO 
105 i2i L$DVTYP:: 
-ASCII /DEQ/ 
101 057 -ASCII /NA/<57> 
067 065 -ASCII /M75/ 
064 000 -ASCII /04/<00> 
.-BLKB 2 
105 i121 L$DESC::.ASCII /DEQ/ 
101 040 -ASCII /NA / 
i25 116 -ASCII /FUN/ 
124 111 -ASCII /CTI/ 
116 101 -ASCII /ONA/ 
040 124 -ASCII /t T/ 
123 124 -ASCII /EST/ 
ASCII <00O> 
.BLKB 2 
LS$HRDLN:: 
. WORD <<<L$NDHRD-L$HRDLN>/2>-1> 
GP$i:: .WORD i 
. WORD QsSTOoOl 
. WORD -3340 
. WORD -3320 
GP$2:: .WORD 1031 
. WORD QSTO2 


ee ee 


—— ee ee 


SEQ 0070 


VAX-11 Bliss-16 V4.1-582 Page 7 
DISK$USER2: (MARSHALL .DEQNAJZQNA2.8L1;4 (7) 


——_— 


TT <a 


177777 


+ ee ee ee ee 


CZQNADO DEQNA FUNCTIONAL TEST- 
REPORT CODING SECTION 


L$NDHRD: : 


L$SFTLN: : 


GP$3:: 


$NOTIMER: 


GP$4:: 


: D 
$LNOTIMER: 
WORD 


GP$S:: 


GP$6:: 


GP$7:: 


LS$NDSFT:: 


BIT15==< 
BIT14== 
BIT13== 
BITi2== 
BITii== 
BIT10== 
BITO9== 
BITOS8== 
BITO7== 
BIT06== 
BITOS== 
BITO4== 
BITO3== 


. WORD 
. WORD 
. WORD 
. WORD 


G6 


14-Mar-1985 13:10:29 VAX-11 Bliss-16 V4.1-582 


—_—— me a re ae 


SEQ Rng 


14-Mar-1985 13:04:24 DISK $USER2 : [MARSHALL .DEQNA)ZQNA2. BLI, * 


700 
704 


1 
<<<L$NDSFT-L$SFTLN>/2>-1> 
130 


QSTO3 
-1 


<<<<$LNOTIMER - $NOTIMER > *400>+4>+40> 
2052 
QSTOS 


RESET .DEQNA, IOP.TABLE, HWP.TABLE 
SWP.TABLE, INTERRUPT.FLG, REG.ADR 


EMP4, 
TEMP9, QSTO1, QSTO2, QSTO3, QSTO4 
QST0S, QST06, QSTO7, MSGS4 


(7) 


ee wee ne lee 


REPORT CODING SECTION 


012737 000001 000000G 
000207 





; Routine Size: 4 words, Routine Base: 
O words 


; Meximum stack depth per invocation: 


CZQNADO DEQNA FUNCTIONAL TEST 


BITO2== 
BITO1== 
BITOO== 
BIT9== 
BIT8== 
BIT7== 
BIT6== 
BITS== 
BIT4== 
BIT3== 
BIT2== 
BITi== 
BITO== 

EF .START== 
EF .RESTART== 
EF .CONTINUE== 
EF .NEW== 

EF .PWR== 
PRIO7== 


HOE == 
L$HARD== 
L$SOFT== 


. SBTTL 
.PSECT 


LRPT: MOV 
RTS 


H6 


14-Mar-1985 13:10:29 
14-Mer-1985 13:04:24 


- 100000 
L$HRDLN+2 
L$SFTLN¢«2 


LRPT REPORT CODING SECTION 
AASCODE$, RO 


#1, TEMP1 
PC 


AASCODE$ + 0000 


VAX-11 Bliss-16 V4.1-582 Page 9 
DISK$USER2: (MARSHALL .DEQNA}ZQNA2.BL1I1;4 (7) 


re | a ee eee — -_— 


SEQ 0072 


1641 
1619 


re ee ne ee ee ee 


— ll TT 


16 


SEQ 0073 
| ZQNA2 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:10:29  VAX-11 Bliss-16 V4.1-582 Page 10 
V01.0 REPORT CODING SECTION 14-Mar-1985 13:04:24  DISK$USER2: (MARSHALL .DEQNAJZQNA2.BLI;4 (7) 


-SBTTL LS$RPT REPORT CODING SECTION 
000000 004737 000000’ L$RPT:: JSR PC,LRPT ; 
000004 104425 TRAP 25 
000006 000207 RTS PC 


a a ES EO ° 


: 


; Routine Size: 4 words, Routine Base: AASCODE$ + 0010 
; Maximum steck depth per invocation: 2 words 


~~ oe ee Ge 
a 
SFz 
Nou 
he 
ee 


LS a a; | wwe —— 
— . —c— ee 


NVAWNMMNVNAS SS PUUWUNNNNNN NNN Re RR eee eee eee ee ee eee ee ee 


ee ee 


CZQNADO 


INITIALIZE SECTION 


sSBTTL 


> 
* 


BGNINI 
LOCAL 


T; 


J6 


DEQNA FUNCTIONAL TEST 
INITIALIZE SECTION’ 


THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED 
AT THE BEGINNING OF EACH PASS. 


THE INITIALIZE CODE IS EXECUTED UNDER FIVE CONDITIONS. THERE 
ARE SUPERVISOR EVENT FLAGS THAT ARE USED TO LET THE 
DIAGNOSTIC KNOW UNDER WHICH CONDITION THE EXECUTION IS TAKING 
PLACE. THE EVENT FLAGS ARE READ USING THE "“READEF” MACRO. 
THE CONDITIONS UNDER WHICH THE INIT CODE IS EXECUTED AND THE 
CORRRESPONDING EVENT FLAGS ARE: 

START COMMAND EF .START 

RESTART COMMAND EF .RESTART 

CONTINUE COMMAND EF . CONTINUE 

POWERDOWN/POWERUP EF .PWR 


NEW PASS 
EXAMPLE OF EVENT FLAG USE: 

IF READEFCEF .START) THEN 

START_FLAG = 1; 

DURING THE INIT CODE, USE THE "GPHARD” MACRO TO OBTAIN P-TABLE 
INFORMATION FOR DEVICE TESTING. GET ONE UNIT'S INFORMATION IF 
THIS IS A SEQUENTIAL DIAGNOSTIC. NUMBER OF UNITS AVAILABLE IS IN 
A HEADER LOCATION: “L$UNIT”. 


START_FLAG, ! SET IF THIS PASS IS A START 


DELAY_MULT; 


CONTAINS DELAY FACTOR 


SETPRI C(PRIO7); ! PRIORITY 7 - NO INTERRUPTS ALLOWED 


START_FLAG = CLEAR_FLG; 


CLEAR FLAG BEFORE TESTING IT 


IF READEF CEF_PWR) ! ARE WE HERE BECAUSE OF POWER FAIL? 
THEN 


BEGIN 
PRINTF ( MSGS4 ); ! “THERE WAS POWER FAILURE - WAITING” 


INCR COUNT FROM O TO 60 DO 
BEGIN 


WAIT APPROX. 60 SECONDS 


DELAY_MULT = 10000; 
DELAY (.DELAY_MULT); 


BREAK; ! BREAK FOR APT 
END; 
; 
IF READEF (CEF_START) ! IS THIS A START ? 
THEN 


BEGIN 
START_FLAG = TRUE; 


END 


——— ee ee re eee ee ee _ 


7 
14-Mer-1985 13:10:29 VAX-11 Bliss-16 V4.1-582 = nae 4 
14-Mer-1985 13:04:24 DISK $USER2: (MARSHALL . DEQNA JZQNA2. eut,s 


8D | 


ee a 


——<— — eld.“ “alsa Ae A le te te 


K6 


j 

‘ ZQNA2 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:10:29 VAX-11 Bliss-16 V4.1-582 mes 
v01.0 INITIALIZE SECTION 14-Mar-1985 13:04:24 DISK $USER2: [MARSHALL .DEQNA)]ZQNA2.BL1I;4 
$ 1701 2 

$ 1702 2 tee 

: Pa, : ! CLEAR HARDWARE P-TABLE ON A START BEFORE DOING THE GPHARDS 

$ 1 $-- 

$ 1705 2 

; 1706 2 IF .START_FLAG OR READEF CEF_NEW) OR ae CEF_ gare 7: 

$ 1707 2 THEN F THIS IS A START 

$ 1708 3 BEGIN 

| ie : LOCAL TABLE_POINTER; 

; 

| i, s ae INCR INDEX FROM O TO HWP_SIZE BY 2 DO ' ZERO OUT THE TABLES 

$ 1712 3 (HWP_TABLE + . INDEX) = 0; 

; i7is 3 

; 1714 3 tee 

: ooo ; ! GET BASE ADDRESS OF HARDWARE P-TABLE AND DEQNA I/0 PAGE 

; '-- 

; 1717 3 

; 1718 3 IF GPHARD ( 0, TABLE_POINTER ) NEQU O ! GET P-TABLE ADDRESS 

; 1719 3 THEN 

; 1720 4 BEGIN 

; i721 4 IOP_DATA = .HWP_TABLE [ ADDR ]); 

$ 1722 4 HWP_TABLE = TABLE _POINTER; ! SAVE HW P-TABLE ADDRESS 

$ 1723 4 REG_ADR = ,HWP_TABLE [ ADDR }; ! SAVE I/0 PAGE BASE ADDRESS 
: 1724 4 GET_ADR =. _TABLE ({ ADDR ]}; ! SAVE I/0 PAGE BASE ADDRESS 
; 1725 4 TMP_IOP_ADR = .HWP_TABLE [ ADOR ]; 

$ 1726 4 INCR INDEX FROM © TO 7 DO 

; 1727 5 BEGIN 

; 1728 5 IOP_TABLE ({ .INDEX ] = .TMP_IOP_ADR; 

; 1729 5 TMP_IOP_ADR = .TMP_IOP_ADR + 2; 

; 1730 4 END; 

$ 1731 3 END; 

; 1732 2 END; 

; 1733 2 RETURN; 

: 1734 1 ENDINIT; 

.GLOBL LSDLY 
-SBTTL CLINIT INITIALIZE SECTION 

000000 004137 000000G LINIT: JSR Ri, $SAVE4 : 

000004 005746 TST -(SP) 

000006 012700 000340 MOV #340,RO : 

900012 104441 TRAP 41 

900014 005004 CLR R4 ; START.FLAG 
900016 012700 000034 MOV #34,R0 ; 

000022 104447 TRAP 47 

900C 103027 BHIS 6$ 

000026 012746 000000G MOV #MSGS4 , -( SP) ; 

900032 012746 000001 MOV #1,-CSP) 

900036 010600 MOV SP,RO ; SP, 
900040 104417 TRAP 17 

000042 012702 000075 MOV #75,R2 ; *, COUNT 


l2' 
(8) 


Te 


1643 
1680 


1681 
1683 


1686 


1688 


—_——_— Ss §— = 





: Routine Size: 
; Meximum steck 


DEQNA FUNCTIONAL TEST 


CZQGNADO 
INITIALIZE SECTION 


012703 023420 1$: 
010301 
001410 2$: 
013700 000000G 
001403 
000004 3$: 
077003 
005301 4$: 
000767 
10442 5$: 
077216 
022626 
012700 000040 6$: 
04447 
103002 
012704 000001 v 
103410 
012700 000035 
104447 
103404 
012700 000036 
04447 
103044 “a 
5060 000000G 9$: 
062700 000002 
020027 000002 
003771 
005000 
104442 
005700 
001430 
017737 000000G 000000G 
010037 000000G 
011000 
010037 000000G 
010037 000000G 
010037 000000G 
013760 000000G 10$: 
2737 000002 000000G 
062700 000002 
020027 000016 
003765 
005726 11$: 
000207 
88 words, Routine Base: 
depth per invocation: 10 words 


L6 


14-Mar-1985 13:10:29 
14-Mar-1985 13:04:24 


#23420 ,R3 
R3,R1 

3$ 
L$DLY,RO 
43 


4(SP) 
RO,3$ 
R1 
2$ 


R2,1$ 
CSP )+,(CSP)-+ 


RO, #2 


@HWP .. TABLE ,IOP.DATA 
RO, HWP. TABLE 


CRO),RO 


0 
TMP . IOP. ADR, IOP. TABLECRO) 
#2, TMP .IOP.ADR 


@2,R0 
RO, #16 
10$ 
(SP )- 
PC 


AASCODE$ + 0020 


ee ee SE LS ae 


VAX-11 Bliss-16 V4.1-582 Page 
DISK $USER2: [MARSHALL .DEQNA]ZQNA2.BLI;4 


+, DELAY .MULT 
DELAY .MULT,$$TMP2 


oS —_————e ew 


+, $$TMP1 
$$TMP 


$$TMP1,« 
$$TMP2 


COUNT, « 


*, START .FLAG 


START .FLAG 


INDEX 

*C INDEX) 
«, INDEX 
INDEX, * 


TABLE .POINTER 


TABLE .POINTER,« 
HWP .T 


E,¢ 


INDEX 
«, ¢C INDEX) 


«, INDEX 
INDEX, * 


SEQ 0076 


13 
(8) 


1690 | 
1691 , 


ZQNA2 


DEQNA FUNCTIONAL TEST 


CZQNADO 
vo1.0 INITIALIZE SECTION 


/ 000000 004737 000020’ 
000004 104411 
000006 


000207 


M6 


14-Mer-1985 13:10:29 
14-Mer-1985 13:04:24 


-SBTTL LSINIT INITIALIZE SECTION 


LSINIT: : JSR PC,.LINIT 
TRAP 11 
RTS PC 


; Routine Size: 4 words, Routine Bese: AASCODES + 0300 
; Meximum steck depth per invocetion: 2 words 


SEQ 0077 


VAX-11 Bliss-16 V4.1-562 


DISK$USER2: [MARSHALL . DEQNA)ZQNA2. eu1,. 


14 
(8) 


1733 


—— ee oe ee 


A AE TT TTT 
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N6 


? 
ZQNA2 CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:10:29 VAX-11 Bliss-16 v4 1-562 ey 
v01.0 AUTODROP SECTION 14-Mer-1985 13:04:24  DISK$USER2: (MARSHALL .DEQNA)ZQNA2.BL1;4 
; 1736 1 SSBTTL ‘AUTODROP SECTION’ 
$ 1739 1 
‘s 1740 1 tes 
a 1741 1 8 
4 1742 1 : THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF 
7 1743 1 : THE “ADR” FLAG WAS SET. THE UNIT UNDER TEST IS CHECKED TO 
1; 1708 4 SEE IF IT WILL RESPOND. IF IT DOESN'T IT IS IMMEDIATELY 
; 1745 1 H DROPPED FROM TESTING. 
$ 1746 1 H 
5 1747 ji $.- 
s 1748 1 
$ 1749 2 BGNAUTO; 
5 1750 2 
; 1751 2 RETURN; 
’ 1752 2 
i 1753 1 ENDAUTO; 
.SBTTL LAUTO AUTODROP SECTION 
000000 000207 LAUTO: RTS PC : 
+ Routine Size: 1 word, Routine Bese: AASCODE$ + 0310 
3 Maximum steck depth per invocetion: O words 
.SBTTL LSAUTO AUTODROP SECTION 
000000 004737 000310’ L$AUTO: : JSR PC ,.LAUTO ; 
000004 104461 TRAP 61 
000006 000207 RTS PC 
+ Routine Size: 4 words, Routine Base: AASCODES + 0312 
3 Maximum steck depth per invocation: 2 words 
i 1754 1 
' 1755 1 


eee ee 


15 
(9) 


1734 


1751 


—— =. 


eg 


oe of © Gf Ge GF Ge Ge GF GF GF Ge oe Ge oe OF oe os 
- 
w 

be RD AD 1D 1D be bb be be be ee be be be be pe be 


000000 000207 


: Routine Size: 
; Meximum steck 


000000 004737 
000004 104412 
000006 000207 


: Routine Size: 
3; Meximum steck 


; 1774 ji 
3 1775 1 


-* _ ee re ee 


B7 





=. hy 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:10:29 VAX-11 Blies-16 V4.1-582 
CLEANUP CODING SECTION 14-Mer-1985 13:04:24  DISK#USER2; (MARSHALL .DEQNAJZQNA2.BLI.8 10) | 


SSBTTL ‘CLEANUP CODING SECTION’ 


+. 
> 


THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 


INSERT YOUR CLEANUP CODING. THIS CODING SHOULD 

RESTORE YOUR TEST-DEVICE TO A NEUTRAL STATE. 

THIS CODE WILL BE EXECUTED AFTER EACH PASS AND AFTER THE 
PROGRAM IS INTERRUPTED BY “tC”. 


-SBTTL LCLEAN CLEANUP CODING SECTION 
LCLEAN: RTS PC ; 


1 word, Routine Base: AASCODE$ + 0322 
depth per invocation: O words 


-SBTTL LSCLEAN CLEANUP CODING SECTION 
000322’ L$CLEAN: : 
angen > 


TRAP 
RTS PC 


4 words, Routine Base: AASCODE$ + 0324 
depth per invocation: 2 words 


1771 


2 ee rr en 


(=) 
. 
PD RD 1D 1D be bb be be be be be be pe 


; Routine Size: 
; Meximum stack 


000000 0047357 
000004 104455 
000006 000207 


: Routine Size: 
; Meximum steck 


8 1795 1 
$ 1796 1 


—_— — Be ee ee 


CF 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:10:29 VAX-11 Bliss-16 V4.1-582 on 17! 
DROP UNIT SECTION 14-Mar-1985 13:04:24 DISK$USER2: (MARSHALL .DEQNA]ZQNA2.BLI:4 (11)! 
SSBTTL ‘DROP UNIT SECTION’ 
a 
: THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
TO NO LONGER BE TESTED. 
: —. DROP CODE HERE. THIS CODE WILL BE EXECUTED AFTER 
: A “DROP” COMMAND OR A "DODU" MACRO EXECUTION. THE PURPOSE 
UNIT HAS BEEN DROPPED. 
7 
BGNDU; 
RETURN; 

ENDDU; 

.SBTTL LDU DROP UNIT SECTION 

LOU: RTS PC 3 1773 

1 word, Routine Base: AASCODE$ + 0334 
depth per invocation: 0 words 

-SBTTL L$OU DROP UNIT SECTION 
000334’ L$DU:: JSR PC ,LDU $ 1792 

TRAP 53 

RTS PC 
4 words, Routine Base: AASCODES$ + 0336 


OR THIS CODE IS TO DO ANY NECESSARY HOUSEKEEPING AFTER A 
depth per invocation: 2 words 
| 
' 
} 


D/ 


' ZQNA2 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:10:29 VAX-11 Bliss-16 V4.1-582 “os 8 | 
lees ADD UNIT SECTION 14-Mer-1985 13:04:24 DISK $USER2: : (MARSHALL. DEQNA )ZQNA2.BLI;4 ae 12) | 

: 1797 1 sSBTTL ‘ADD UNIT SECTION’ 

; 1798 1 

: 1799 1 ¢ 

3 i800 1 ! 

: 1801 1 : THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 

3 1802 1 : TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 

: pane ; TO THE TEST CYCLE. | 

: : 

: 1805 1 : INSERT ADD CODE HERE. THIS CODE WILL BE EXECUTED hy ll 

$ 1806 1 : AN “ADD” COMMAND. THE PURPOSE OF THIS CODE IS TO DO A 

$ aoe : HOUSEKEEPING THAT MAY BE NECESSARY AFTER A UNIT HAS BEEN ADDED. 

3 

8 1809 1 : 

: 1810 1 

: i811 e2 BGNAU; 

3 1812 2 

3 1813 2 RETURN; 

3 1814 2 

: 1815 1 ENDAU; 

.SBTTL LAU ADD UNIT SECTION 

000000 000207 LAU: RTS PC $ 1794 

; Routine Size: 1 word, Routine Base: AASCODE$ + 0346 

; Maximum stack depth per invocation: 0O words 

.SBTTL LS$AU ADD UNIT SECTION 

000000 004737 000346' L$AU:: JSR PC,LAU : 1813 

000004 104452 TRAP 52 

000006 000207 RTS PC 

; Routine Size: 4 words, Routine Base: AASCODES + 0350 

; Maximum stack depth per invocation: 2 words 

$ 1816 1 

$ 1817 1 


—-_ — ———— 
ee RR 


_—eeee eee ee 


— 


et 


— —  ——— —@ en ee 
— «ss + ~ eee ee wee a ee — _— 


eT 


SEQ 0082 


ZQNA2 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:10:29 VAX-11 Bliss-16 V4.1-582 Page 19! 
vo1.0 ADD UNIT SECTION 14-Mer-1985 13:04:24 DISK$SUSER2: : (MARSHALL . DEQNA JZQNA2.BLI;4 a3) | 
: 1618 1 
: 1819 2 BGNSRV (CNXM_INT); 
: 1820 2 
: 1821 2 ! 
3 1822 2 $ 
: 1823 2 : GLOBAL LOCATION "“INTERRUPT_FLS” IS SET TO TRUE WHICH INDICATES 
: 1824 2 ! THE INITIALIZATION SEQUENCE INTERRUPT OCCURED. 
: 1825 2 ! 
3 1826 2 : 
3 1827 2 
8 1828 2 
8 1829 2 
8 1830 1 ENDSRV; 

.SBTTL NXM.INT ADD UNIT SECTION 
000000 012737 177777 000000G NXM.INT: : 

MOV #-1, INTERRUPT .FLG $ 1828 
000006 000002 RTI ; 1819 
; Routine Size: 4 words, Routine Base: AA$CODE$ + 0360 
; Maximum stack depth per invocation: O words 


END 
1833 0 ELUDOM 


OTS externel references 


-GLOBL $SAVE4 
PSECT SUMMARY 
Psect Name Words Attributes 
$CODE $ 50 RO, <2: > COA, 88. CON 
AASCODE$ 124 yk.» Se ee |2|COC 


Library Statistics 


orceree- Symbols -------- Pages Processing 
File Total Loaded Percent Mapped Time 
DISK$USER2: [MARSHALL . DEQNA)JQNALIB.L16;15 
223 48 21 14 00:00.1 


INTERRUPT_FLG == 80'177777'; 
| 


. ee ES Ee 


—— -—- a RL LL A NE ES 


: : F7 


! 
| ZONA2 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:10:29 VAX-11 Bliss-16 V4.1-582 ee: ans Q | 
vo1.0 ADD UNIT SECTION 14-Mer-1985 13:04:24 DISKSUSER2: (MARSHALL . DEQNA JZQNA2. eur.s as 
: COMMAND QUALIFIERS 
: BLISS/PDP11 ZQNA2.BLI/LIST=ZQNA2.LIS/OBJECT=ZQNA2 . OBU/SOURCE=PAGE : 53 | 
Size: 124 code + 50 date words 
Run Time: 00:12.9 


Elepsed Time: 00:43.3 
Lines/CPU Min: 8499 
———— Min: 58038 
ay Used: 168 pages 
Compilation Complete 


Hr rrr OOOO 


G/ 


14-Mer-1985 13:11:16 
14-Mar-1985 13:05:35 


MODULE ZQNA3 (#iITLE ‘CZQNADO DEQNA FUNCTIONAL TEST‘ 
IDENT = ‘VO1.0' 
— _MODE( ABSOLUTE ) 
SSBTTL ‘DEQNA TEST DEFINITION MODULE’ 
BEGIN 
!<BLF /FORMAT > 
LIBRARY ‘QNALIB’ ; ! QNALIB LIBRARY 
REQUIRE ‘BLSMAC. REQ’ ; 


CZQNADO DEQNA FUNCTIONAL TEST 


— | 


SEQ 0084 
VAX-11 Bliss-16 V4.1-582 Page i 
DISK$USER2: [MARSHALL .DEQNAJZQNA3.BL1;4 (1) 


! DIAGNOSTIC SUPERVISOR LIBRARY 


~ 
ui 
tw 
© 
be ee ee be ee be be be be he be be be be be be be be ee ae ee ee he be he bee be ee fee be he be ee ee 


me re ee 


CZQNADO DEQNA FUNCTIONAL TEST 
DEQNA TEST DEFINITION MODULE 


PSECT 


CODE = ABSCODES; 


Ses 


EXTERNAL DATA USED BY THIS MODULE 


EXTERNAL ROUTINE 


CHK_CSR_STATUS 
CHK_RIXI_STATUS 
CHK_RCV_STATUS 
CHK_XMIT_STATUS 
CLR_BUFFERS 
CLR_DESCR 
COMPARE _PACKETS 
E1$REPORT 

ERROR $REPORT 
FORM_HEX_ADR 


at 
RESET_DEQNA 
SEND_ELOOP_PACKET 
SEND_TEST_PACKET 
SET_XDESCR_LIST 
SET_RDESCR_LIST 
TURN_OFF_LED 
VER_DESCR_STATUS 
WAIT_FOR_TIMEOUT 
WALKING_BIT 
WRT_STATION_ADR 
XMIT_AND_RCV_PACKET 
XMIT_ILOOP_PACKET 
XMIT_SETUP_PACKET 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


H/ 


! PRINT EXTENDED ERROR MESSAGE 
! PRINT EXTENDED ERROR MESSAGE 


! NXM INTERRUPT SERVICE ROUTINE 


SEQ 0085 
VAX-11 Bliss-16 V4.1-582 age 
DISK $USER2: [MARSHALL . DEQNA )ZQNA3.BLI;4 


me ee ee ee 


<N 


QNA 
01. 


~ 
y 
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CZQNADO DEQNA FUNCTIONAL TEST 


DEQNA TEST DEFINITION MODULE 


EXTERNAL 


fee 
v 
. 


1/7 


14-Mer-1985 13:11:16 
14-Mar-1985 13:05:35 


COMMUNICATION AREA DECLARATIONS 


RCV_D_LIST 
XMIT_D_LIST 
DESCR_LIST 
RCV_BUFFER 


XMIT_BUFFER 
DATA_BUFFER 
ARGET 


6 
BD_PROM_DESCR 
STATION_ADR 
PTRN_TABLE 


AAAAAAAG AAMAS 
orm 


D_SIZE, WORD ] ine ( DL_FIELDS ), 
D_SIZE, WORD ] FIELD ( DL_FIELDS ), 
DESCR_SIZE, WORD) FIELD ( DL_FIELOS 


HARDWARE AND SOFTWARE P-TABLE STORAGE DECLARATIONS 


HWP _ TABLE 
SWP_TABLE 


REG_ADR 
GET_ADR 
IOP_DATA 


: REF REG_STR FIELD ( IOP_FIELDS ), 
: REF ADR_STR FIELD € IOP_FIELDS ), 
: REF REG_STR FIELD ( IOP_FIELOS ), 


), 


: REF BLOCK ({ HWP_SIZE, WORD ] FIELD ( HWP_FIELDS ), 
: REF BLOCK ( SWP_SIZE, WORD ) FIELD ( SWP_FIELDS ), 


SEQ 0086 
DISK$USER2: [MARSHALL .DEQNAJZQNA3.8L1;4~ 


VAX-11 Bliss-16 V4.1-582 


3° 
(3) | 


| 
| 


—s- 
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J/ me | 


SEQ 0087 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 | VAX-11 Bliss-16 V4.1-582 Page 4° 
DEQNA TEST DEFINITION MODULE 14-Mar-1985 13:05:35  DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BLI;4 (4) | 
! (O=NONE,-1*L-CLOCK,1=*P_CLOCK) | 
te 
MISCELLANEOUS DATA DECLARATIONS | 
§-- i 
XBUF _LENGTH, RBUF __LENGTH, INTERRUPT _FLG, COUNTER, 
SWP_BLOCK_MEM, SWP_TOUT_VAL, | SWP_ILOOP, SWP_TIMER, 
UP_COUNTER, DOWN_COUNTER, CHECKSUM, ERR_NUMBER, 
XC_FLAG, SWP_LBC, 
ERR_COUNT, ERR_FLAG, CSR_WORD, PRIOO, 
PRIO1, R102, RIO3, PRIO4, 
PRIOS , PRIO6 + PRIO7 P DEQNA_NO $ WORD ‘ 
tee 
! TEMPORARY STORAGE DATA DECLARATIONS 
Sos 
Pi, P2, P3, Pa, 
TMP_IOP_ADR, TMP_REG_DATA,  TEMP1, TEMP2, 
TEMP3, TEMP4, TEMPS, TEMP6, 
TEMP7, TEMPS, TEMPS, TAOR1, 
TADR2 : WORD, 
TBYTE1, TBYTE2, TBYTES, TBYTES =: BYTE, 


RE eS ee a re ne en ——<—2—— <-—~ - - 
eee OR ee EE TEETER me — 


~—- -- —_ i tl LL: L¢« «L.A: I A CCl lll lll! ll ll ll: Ct: lilt ti. ai ain. <i: Ll. til. iil. itl. tte. At ty a, eg J 


K7 Ge S24 


| ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 phn S| 
/V01.0 DEQNA TEST DEFINITION MODULE 14-Mar-1985 13:05:35 DISK $USER2: [MARSHALL .DEQNA)ZQNA3.8L1;4 (5) i 
} 
; i598 1 | 
; 1599 1 bes 
| 1600 1 ! ERROR MESSAGES DEFINED EXTERNALLY 
; 1601 1 !-- | 
; 1602 1 
: 1603 1 
: 1604 1 MSGOO, MSG71, 
; 1605 1 MSGO1, MSGO2, MSGO3, MSGO4, MSGOS, MSGO6, MSGO7, MSGO8, MSGO9, MSG10O, 
$ 1606 1 MSGi1, MSGi2, MSG13, MSGi4, MSG15, MSG16, MSG17, MSG18, MSG19, MSG20, 
; 1607 1 MSG21, MSG22, MSG23, » MS » MS » MS P » MSG29, MSG30, j 
: 1608 1 MSG31, MSG32, MSG33, MSG34, MSG35, MSG36, MSG37, MSG38, MSG39, MSG40, 
; 1610 i MSGS1, MSGS2, MSGS3, MSG54, MSG5S, MSG56, MSG57, MSGS5S8, MSG5S9, MSG60, 
; ey : MSG61, MSG62, MSG63, MSG64, MSG65, MSG66, MSG67, MSG68, MSG69, MSG70; 
; 
; 1 


—_—_——_—— ne 
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CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mer-1965 13:11:16 
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST 14-Mer-1985 13:05:35 


SSBTTL ‘TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST’ 


See 
TEST 1: NON-EXISTANT I/0 PAGE REGISTER TEST 
DESCRIPTION: 
This test verifies thet all the device registers residing in 


Herdwere tested: 
Processing: 
BEGIN 
pe ready for NXM interrupt 
EPEAT for every 1/0 page register 
reed I/0 p- ge register 
IF NXM occured 
eee error message if not inhibited 
ENDREPEAT 
write any date pettern into the first 2 1/0 page 
registers 
IF occured 
THEN 
a error message if not inhibited 
END 


SEQ 0089 
VAX-11 Bliss-16 V4.1-582 Page 
DISK $USER2 : [MARSHALL .DEQNA}ZQNA3.8L1;4 


the 
I/0 Page can be accessed without forcing a non-existent memory (NXM) 
interrupt. If the operator specifies loop on error, the progrem 
re-executes the code thet detected the error until tC is entered. 


Q-Bus to DEQNA Slave Registers Interface 


6 
(6) 


ES 
eS 
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°o 
os 
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SEQ 0090 


CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-5862 Page 7 
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST 14-Mer-1985 13:05:35 DISK SUSER2: [MARSHALL .DEQNA)ZQNA3.811;4 (7) 
BGNTST; 
SETVEC (4, NXM_INT, PRIO7); ' SET UP FOR AN NXM INTERRUPT 
DELAY (MS_DELAY); ' DELAY SO x 100 us «= 5 ms 
INTERRUPT _FLG = CLEAR_FLG; ' CLEAR OUT NEX FLAG 
MP_IOP_ADR = .HWP_TABLE [ ADDR ]}; 
Ica INDEX FROM 0 TO 7 DO 
BEGIN 
SGNSUB ; 
TEMP = ..TMP_IOP_ADR; 
DELAY(7 ); 

IF | INTERRUPT. -FLG EQLU WORD_LIMIT ! SEE IF WE GOT A NXM INTRT 
BEGIN ! ADDRESS NOT THERE 
INTERRUPT_FLG = CLEAR_FLG; ' CLEAR TRAP FLAG 

PRINTB ( MSGS9 ); 
PRINTS ( MSG70, .TMP_IOP_ADR ); 
ERRDF (0101, mSGOO, E1 REPORT); ! ‘1/0 PAGE REG. NOT PRESENT’ 
DODU ( DEQNA_NO ); 
DOCLN; 
END; 
ENDSUB; 
TMP_IOP_ADR = .TMP_IOP_ADR «+ 2; 
3 
TMP_IOP_ADR = .HWP_TABLE [ ADDR ]}; 
INCR INDEX FROM O TO 1 DO 
BEGIN 
BGNSLS ; 
.THP_IOP_ADR = SX‘ 7F‘; ' WRITE FIRST 2 LOCATIONS 
DELAY( 7); 
— EQLU WORD_LIMIT * SEE IF WE GOT A NXM INTRT 
BEGIN : ADDRESS NOT THERE 
INTERRUPT _FLG = CLEAR_FLG; ¢ CLEAR TRAP FLAG 


PRINTB ( MSGS9 ); 
PRINTS ( MSG70, .TMP_IOP_ADR ); 

ERRDF (0102, MSGOO, E1SREPORT); ¢ ‘170 PAGE REG. NOT PRESENT’ 
DODU ( DEQNA_NO ); 


DOCLN; 
END; 
ENDSUB ; 
TMP_IOP_ADR = .TMP_IOP_ADR «+ 2; 
ENO; 


CLRVEC (4); ' CLEAR INTERRUPT VECTOR 
ENDTST; 


-TITLE ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 
IDENT /VO1.0/ 


ZQNAS 
vo1.0 


—— eee —_——— 28 « 


CZ 


DEQNA FUNCTIONAL TEST 


$Ti: 


QNADO 
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER 





N7 


14-Mer-1985 13:11:16 
TEST 14-Mer-1985 13:05:35 


CHK.CSR.STATUS, CHK .RIXI.STATUS 
CHK. .RCV.STATUS, CHK. XMIT.STATUS 





DOWN. . NUMBE 
XC.FLAG, SWP.LBC, ERR.COUNT, ERR.FLAG 
CSR. 00, PRIO1, PRIO2 

PRIOS, PRIOS, PRIOS, PRIO6, PRIO7 
DEQNA.NO, Pi, P2, P3, P4, TMP.IOP.ADR 


TEMP1, TEMP2, TEMP3 
EMP4, TEMPS, TEMP6, TEMP7, TEMPS 

T TADRi, TADR2, TBYTE1, TBYTE2 
TBYTES, TBYTE4, MSGOO, MSG71, MSGO1 

MSGO2, MSGO3S MSGOS 


Ln »REG.DATA, 


MSG48 

MSG52. MSG53, MSGS4, MSGSS, MSGS6 

MSG57, MSG58, MSGS9, MSG60, MSG6l 

MSG62, MSG63, MSG64, MSG65, MSG66 

MSG67, MSG68, MSG69, MSG70. LSDLY 

$71 TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST 
ABSCODE$, RO 

RL. sSAVE2 

@PRIO7, -(SP) 


VAX-11 Bliss-16 V4.1-5862 age 
DISK $USER2 : (MARSHALL .DEQNA)ZQNA3.8L1;4 


~~ CLEP LL ELLE LEED, OEE ed 


SEQ 0091 


8 
(7) 


CZQNADO 
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST 


DEQNA FUNCTIONAL TEST 


000000G 
000004 
000003 
000062 
1$: 
000000G 
000010 2%: 
3$: 
000000G 4%: 
000000G 
000010 
5$: 
000007 
6$: 
000000G 
000010 7$: 
8$: 
000000G 177777 9$: 
000000G 
000000G 
000001 
000000G as 
000000G 
000002 
000000G 
000006 
10$: 
000002 000000G 
000000G 000000G 
' 11$ 


PEEEPEEE DEE BEE 


‘nit 


B8 


1$ 
INTERRUPT .FLG 


SHWP . TABLE, TMP. IOP. ADR 


#10,R2 


a 

QTMP . IOP. ADR, TEMP 1 
67,R1 

9$ 

LSDLY,RO 

8$ 


10( SP ) 
RO, 7% 
Ri 


6% 
~~ agatha aatatg 


5 
#2, TMP. IOP .ADR 
R2,5$ 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


——_ » TMP. IOP. ADR 


VAX-11 Bliss-16 V4.1-582 


ah ee 


SEQ 0092 
Pp 


9 
DISK $USER2: (MARSHALL . DEQNA )ZQNA3 .BLI _ (7) 


¢,$$TMP2 
*,$$TMPi 
$$TMP 


$$TMPi,« 
$$TMP2 


*, INDEX 


*,$$TMP2 
*,$$TMP1 
$$ TMP 


$$TMP1i,+« 
$$TMP2 


1651 


1660 


1663 
1664 


1665 


1666 


-—_— ee 


C8 


{ 
ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 nee 10 | 
vo1.0 TEST 1 - NON-EXISTANT 1/0 PAGE REGISTER TEST 14-Mer-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BLI;4 (7)/ 
000260 012777 000177 000000G MOV $177,@TMP .IOP.ADR ; 1678 
000266 012701 000007 MOV . 3s *,$$TMP2 1679 
000272 001410 12$: BEQ 15$ 
000274 013700 000000G MOV LSOLY,RO ; *,$$TMPi 
000 001403 BEQ 14$ 
000302 000010 13%: CLR 10( SP) ; $$TMP 
000306 077003 SOB RO,13$ ; $$TMP1,* 
000310 005301 14$: DEC Ri ; $$TMP2 
000312 000767 BR 12$ 
000314 023727 000000G 177777: 15$: CMP INTERRUPT .FLG, #-1 $ 1680 
000322 001032 BNE 16$ 
000324 005037 000000G CLR INTERRUPT .FLG ; 1683 
000330 012716 000000G MOV #MSG59, (SP) $ 1684 
000334 012746 000001 MOV #1,-CSP) 
340 Ol MOV SP ,RO ; SP,* 
000342 104414 TRAP 14 
000344 013716 000000G MOV TMP .IOP.ADR, (CSP) $ 1685 
000350 012746 000000G MOV #MSG70, -(CSP) 
000354 012746 000002 MOV #2,-CSP) 
360 010600 MOV SP ,RO 3 SP,* 
000362 104414 TRAP 14 
000364 104455 TRAP 55 ; 1686 
000366 000146 -WORD 146 
000370 . WORD 
000372 -WORD E1S$REPORT 
000374 012700 000000G MOV QNA.NO,RO ; 1687 
000400 104451 TRAP 
000402 104444 TRAP 
000404 062706 000006 ADD 66 ,SP ; 1682 
000410 104467 168: TRAP 67 : 1689 
000412 ROR RO 
000414 103720 BLO il 
000416 062737 000002 000000G ADD 62, TMP .IOP.ADR 3 1691 
000424 077264 SOB - ; INDEX,+« 1675 
000426 012700 000004 MOV ° 3 1694 
000432 104436 TRAP 
000434 062706 000012 ADD #12,SP : 1611 
000440 000207 RTS 
; Routine Size: 145 words, Routine Bese: ABSCODE$ +» 0000 
; Maximum steck depth per invocation: 13 words 
-SBTTL Ti TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST 
000000' Ti: 
1$: JSR PC,$T1 : 1694 
TRAP 
ROR RO 
BLO 1$ 
RTS PC 





———_— ee 


ee eee 


ZQNA3 
vo1.0 


; Routine Size: 
; Maximum stack depth per invocation: 


3 1697 
$ 1698 


CZQNADO 
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST 
6 words, 


—— re ee 


DEQNA FUNCTIONAL TEST 


Routine Base: ABSCODE$ + 0442 
2 words 


; D8 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


VAX-11 Bliss-16 V4.1-582 


———— eee 


SEQ 0094 


P 
DISK$USER2: [MARSHALL .DEQNAJZQNA3.6LI;4~ 


— 


(7 


11 
) 


——«< — 
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sSBTTL 


See 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 2 - CSR STATIC BIT TEST 


‘TEST 2 - CSR STATIC BIT TEST’ 


DESCRIPTION: 


This test verifies that the CSR register static bits can be set 
and cleared as specified. The host writes dete patterns to this 
register and reads them back verifying no static 
(stuck et 1 / stuck at 0) faults occur. If the operator specifies 
loop on error, the progrem re-executes the code thet detected the 
error until tC is entered. 


Herdwere tested: 


tiie 


E8 


CSR STATIC BIT TEST 


Q-Bus to DEQNA Slave Regs. Interface 


Processing: 
BEGIN 


oe serous Reset ( SR ) bit in the CSR for stuck at 0 


IF error 
THEN 
ta. error message if not inhibited 


set stetic bits ( 0.3.8.9 ) and check for expected CSR status 
IF error 
THEN 
print error message if not inhibited 
ENDIF 
clear static bits and check for expected CSR status 
F error 


ey int error message if not inhibited 


set static bits ( 0,3,8,.9 ) and check for expected CSR stetus 
IF error 


ie error message if not inhibited 
I 


reset DEGQNA and check for expected CSR status 
IF error 
THEN 
print error message if not inhibited 
ENDIF 


END 


eee ee es 


14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 age 
14-Mer-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BL1;4 ( 
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SEQ 0095s 
Pp 12! 
B) | 
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CZQNADO DEQNA FUNCTIONAL TEST 
TEST 2 - CSR STATIC BIT TEST 


BGNTST; 
BGNSUB ; 


fee 
! CHECK IF CSR STATIC BITS (BIT 0,3.8 AND 9) ARE NUT STUCK AT O 


RESET_DEQNA ( ); 

PUT_BIT ( CSR, ALL _BITS, PATRNI ); 
DELAY ( TIME6_LIMIT ); 

TEMP1 = GET_BIT [ CSR_ALL } AND PATRN1; 
ad” ae NEQU PATRN1 


PRINTB (€ MSGS9 ); 

PRINTB € MSG6O ); 

PRINTB € MSG30, .GET_ADR ( CSR_ALL J], .TEMP1, PATRN1 ); 
ERRDF ( 0201, MSGOO, E1$REPORT ); 


tee 


' CHECK IF CSR STATIC BITS (BIT 0,3,8 AND 9) ARE NOT STUCK AT 1 


BGNSUB ; 
PUT_BIT € CSR, ALL_BITS, ZERO ); 
DELAY ( TIME6_LIMIT ); 
TEMP2 = GET_BIT [{ CSR_ALL ) AND PATRNI; 
“aa NEQU ZERO 


>: 
PRINTB ( MSG30, .GET_ADR { CSR_ALL ), .TEMP2, ZERO ); 
ERRDF (€ 0202, MSGOO, E1SREPORT ); 


BGNSUB ; 
PUT_BIT ( CSR, ALL_BITS, PATRNI ); 
RESET_DEQNA ( ); 
TEMP3 = GET_BIT - CSR_ALL ) AND PATRNI1; 
of . TEMP3 NEQU ZERO 


HEN 
BEGIN 
PRINTB € MSGS9 ); 
PRINTB (€ MSG62 ); 
PRINTB € MSG30, .GET_ADR ( CSR_ALL J], .TEMP4, ZERO ); 
ERRDF ( 0203, MSGOO, E1$REPORT ); 


ENDSUB ; 


A 


-_/ 


SEQ — 


14-Mar-1985 13:11:16 | VAX-11 Bliss-16 V4.1-S82 Page 13! 
14-Mar-1985 13:05:35  DISK$USER2:(MARSHALL .DEQNA)ZQNA3.BL1:4 (9) 


me eee eee ee ee 


012702 


ee ee ee ee ee 


G68 


SEQ 0097s 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 14! 
TEST 2 - CSR STATIC BIT TEST 14-Mar-1985 13:05:35 DISK$USER2: (MARSHALL . DEQNAJZQNA3.BL1;4 (9) | 
ENDTST; 
.SBTTL $T2 TEST 2 - CSR STATIC BIT TEST 
0000006 $T2: JSR Ri, $SAVE2 ; 1696 
000016 SUB #16,SP 
i$: TRAP 2 ; 1746 
0000006 JSR PC,RESET.DEQNA ; 1754 
000000G MOV REG.ADR,R1 ; 1755 
001411 000016 MOV #1411,16(R1) 
000001 MOV #1,R2 ; *,$$TMP2 1756 
2$: BEQ 5$ 
0000006 MOV L$DLY,RO ; *,$$TMP1 
BEQ 4$ 
000014 3$: CLR 14(SP) ; $$TMP 
SOB + rf $$TMP1,* 
4$: DEC ; $$TMP2 
BR 2s 
000016 S$: MOV 16(R1),(SP) ; *,TMP.LOCATION 1757 
0000006 MOV (SP), TEMP1 ; TMP.LOCATION, « 
176366 BIC #176366, TEMP1 
000000G 001411 on TEMP1, #1411 : 1758 
MOV @MSG59, -( SP) i 1761 
000001 MOV #1,-C(SP) 
MOV SP ,RO 3 SP ,* 
TRAP 14 
MOV @MSG60, (SP) ; 1762 
000001 MOV #1,-CSP) 
MOV RO ; SP ,* 
TRAP 14 
001411 MOV #1411,(SP) ; 1763 
0000006 MOV TEMP1,-(SP) 
000000G 000012 MOV GET. ADR, 12(SP) ; *, TMP.LOCATION 
000016 000012 ADO #16,12(¢SP) ; *, TMP LOCATION 
000012 MOV 12(SP),-CSP) ; TMP.LOCATION, « 
000000G MOV 30,-(SP) 
000004 MOV 64,-CSP) 
MOV SP ,RO > SP ,* 
TRAP 14 
TRAP 55 ; 1764 
.WORD 311 
. WORD 
.WORD E1SREPORT 
000016 ADD #16,SP : 1760 
6$: TRAP 67 ; i765 
ROR RO 
BLO i$ 
7%: TRAP 2 ; 1766 
0000006 MOV REG. ADR,R1 ; 1773 
000016 CLR 16(R1) | 
000001 MOV #1,R2 ; *, $$TMP2 1774 


-— —oo ee ee 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 2 - CSR STATIC BIT TEST 


000016 


000000G 
000001 


000016 
000016 


8$: 


9%: 


10$: 
11$: 


12$: 


13$: 


H8 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


11$ 
LSOLY,RO 
10$ 

14( SP) 
RO,9$ 

Re 


8% 
16(R1),4(SP) 
4(SP), TEMP2 
#176366, TEMP2 


12$ 
#MSG59, -( SP) 
#1,-CSP) 


MSGOO 
E1$REPORT 
#16,SP 
67 

RO 

7$ 


2 

REG. ADR,RO 
#1411,16CRO) 
PC ,RESET.DEQNA 
REG. ADR,RO 
16(RO), 10(SP) 
10(SP), TEMPS 
#176366 , TEMPS 


14$ 
#MSGS9, -CSP) 
-(SP) 


SP ,RO 


14 
#MSG62 , (SP ) 
#1, -(SP) 
SP,RO 

14 


Nn a ——_—_—— 


aun S088 
DISK$USER2Z: [MARSHALL .DEQNAJZQNA3.BLI;4~ 


VAX-11 Bliss-16 V4.1-582 


; *,$$TMP1 
+ $STMP 

; $$TMPi,« 
; $$TMP2 


; *, TMP .LOCATION 
; TMP .LOCATION, «+ 


; SP,* 


; SP,* 


*, TMP .LOCATION 
*, TMP .LOCATION 
TMP .LOCATION, + 


; SP,* 


» (MP .LOCATION 
MP .LOCATION, + 


— * 


15 
(9) 


1775 


1776 
1779 


1780 


1781 


1782 


1778 
1783 


1784 
1787 


1788 
1789 


1790 
1793 


1794 


a km le - 


- ——— + - 


; Routine Size: 
; Maximum stack depth per invocation: 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: : 
; Maximum steck depth per invocation: 


; 1801 
; 1802 


004737 
104466 
006000 


103773 
000207 


1 
1 
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CZQNADO DEQNA FUNCTIONAL TEST 
TEST 2 - CSR STATIC BIT TEST 


000000G 
000000G 000022 
000016 000022 
000022 


000000G 
000004 


14$: 
000016 


198 words, 


000456' T2:: 
i$: 


6 words, Routine Base: 


2 words 


Routine Base: ABSCODE$ 
19 words 


RTS 


18 


14-Mer-1985 13:11:16 
14-Mar-1985 13:05:35 


CSP) 
TEMP4 , - (SP) 
GET .ADR ,22(SP ) 


#16,SP 


T2 TEST 2 - CSR STATIC BIT TEST 


ABSCODE$ + 1272 


EE ——_ -- 


SEQ 0099 


VAX-11 Bliss-16 V4.1-582 


DISK$USER2: [MARSHALL .DEQNA)ZQNA3. Bursa 


*, TMP .LOCATION 
*, TMP .LOCATION 
TMP .LOCATION, 


SP ,* 


oe em oe we - 


(9) | 
1795 


1796 
1792 
1797 
1696 
1798 


~ 
@ 
tw 
tosh 
Bae ee be ee ee ee ee be be ee ee bee ee ee be ee ee ee ee ee ee be ee ee he be ee be he be be 


————_—— 


CZQNADO DEQNA FUNCTIONAL TEST Page 
TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 14-Mar-1985 13:05:35 DISK $USER2: (MARSHALL .DEQNA)ZQNA3. BLI;4 


SSBTTL ‘TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST’ 


ee ee sa ae “lL, Lr. ta 


J8 


14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 


SEQ 0100 


TEST 3: ETHERNET STATION ADDRESS VERIFY TEST 
DESCRIPTION: 


This test verifies that the Ethernet Station Address PROM can be 

read and loaded to host memory op pegs f Ethernet Station Address is 
verified and checksum is computed from PROM date read and this checksum 
is compared to the checksum stored in the Ethernet Station Address 
PROM. Ethernet Station Address is always printed out on the console in 
the Ethernet standard format. If the address is not proper, the error 
is recorded and an appropriate error message is printed out on the 
console. If the operator specifies loop on error, the program 
re-executes the code thet detected the error until tC is entered. 


Hardware tested: Station Address PROM 
Q-Bus DMA Interface 


Processing: 
BEGIN 


read DEQNA Station Address PROM and checksum 
save copy of Station Address PROM in host memory 
print Station Address on the console in standard format 
compute Station Address ROM checksum 
— read not equal checksum computed 

print error message if not inhibited 
ENDIF 
IF Station Address 

{ell O's 

OR {ell i's): 

OR [multicast bit set]: 
THEN 

gerne error message if not inhibited 


END 


3 *(10) 


PAAAAAAAAAA AMA AAA MUNA AAA AAOAO IIIA OOUUUUUUUUU UU 


— —— me llama A i. ts ae 


K8 


CZQNADO DEGNA FUNCTIONAL TEST 
TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 


BGNTST; 
BGNS 


UB ; 
RESET_ DEQNA ( ); 
FORM_HEX_ADR ( PHA ~INDEX ); 


"COMPUTE EXPECTED CHECKSUM 


: 
$- 
CHECKSUM = 0; 
INCR INDEX FROM O TO 5 BY 2 DO 
BEGIN 
IF € .CHECKSUM AND #0'100000' ) NEQU ZERO 
THEN 
BEGIN 
CHECKSUM = 
CHECKSUM = 
END 
ELSE 
CHECKSUM = .CHECKSUM f 1; 
CHECKSUM = .CHECKSUM + .STATION_ADR [ 
‘— GTRU WORD_LIMIT 
CHECKSUM = .CHECKSUM + 1; 


COUNTER = .COUNTER «+ 1; 
END; 


.CHECKSUM ft 1; 
.CHECKSUM « 1; 


.COUNTER ]; 


See 
' PRINT PHYSICAL STATION ADDRESS 
¢ 


PRINTB ( MSGO1, .HWP_TABLE [ ADDR ] ); 
PRINTB (€ PHYS_ADR ); 


See 


: Bais EXPECTED CHECKSUM COMPUTE 
i 


PUT_BIT ( CSR, LB, EXT_LOOPBACK ); 
DELAY ( 5S ); 

TEMP1 = REG. ADR c 1, ALL_BITS }; 
TEMP1 = .TEMP1 ft 8; 

TEMP2 = .REG_ADR [ a. ALL BITS }; 
STATION_ADR [ CHSUM } TEMP1 OR ( .TEMP2 AND #0'000377' ); 
PUT_BIT ( CSR, LB, ZERO ); 


” CHECKSUM NEQU STATION. ADR [ CHSUM ) 


14-Mar-1985 13:11:16 
14-Mer-1985 13:05:35 


cee OS + ee = -— ——_ - 


VAX-11 Bliss-16 V4.1-582 


! READ ACTUAL CHECKSUM FROM ving ht Eg ADDRESS PROM AND COMPARE IT TO 


i 
' 


SEQ 0101 
DISK$USER2: [MARSHALL .DEQNAJZQNA3.8L1;4~ 


16 | 
Cil) 


~<— ee 


_————_— — 


~ 

wo 

rw 

~ 
KFPWUHPSHSHSHLSWHSHLAUWUWHS aS HaAAWUWUWUORAG 


TS 


L8 


14-Mer-19865 13:11:16 


CZQNADO DEQNA FUNCTIONAL TEST 
14-Mer-1985 13:05:35 


TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 


BEGIN 
PRINTB ( MSGS9 ); 


PRINTB € MSG63, .STATION_ADR [ CHSUM ], .CHECKSUM ); 


VAX-11 Bliss-16 V4.1-582 


; 
; INDEX 


ERRDF (0301, MSGOO, E1$REPORT); 
i 
ENDSUB; 
TEMPS = ZERO; 
TEMP4 = ZERO; 
——— FROM 0 T0 2 DO 
TEMPS = .TEMP3 + .STATION_ADR [{ .INDEX }; 
IF {STATION. ADR { .INDEX } EQLU sx’ FFFF’ 
TEMP4 = ,TEMP4 « 1; 
END; 
IF € . TEMPS EQLU ae ) 
OR ( .TEMP4 GTRU ZERO ) 
OR CC STATION. "On { ZERO ) AND #X‘'0100' ) EQLU #xX‘0100' ) 
BEGIN 
PRINTB (€ MSG59 ); . 
PRINTB (€ MSG64 ); 
PRINTB (€ PHYS_ADR ); 
ERRDF ( 0302, MSGOO, E1LSREPORT); 
END; 
ENDTST; 
-SBTTL $73 TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 
0000006 $73: JSR R1, $SAVE2 
000006 SUB 06, SP 
1$: TRAP 2 
JSR PC RESET .DK ANA 
000023 MOV 023,-CSP) 
000000G JSR PC ,FORM.HEX.ADR 
0000006 CLR CKSUM 
CLR Ri 
000000G 2$: yg CHECKSUM,RO 
100000 0000006 +4 @- 200000. CHECKSUM 
000000G MOV RO, CHECKSUM 
000000G INC CHECKSUM 
000000G 3$ MOV RO, CHECKSUM 
000000G i$ Pe ag —se 
000000G 000000G ADD STATION. ADR(RO), CHECKSUM 
0000006 INC COUNTER 
000002 ADD #2,R1 


aun 0302 
DISK$USER2: [MARSHALL .DEQNAJZQNA3.8L1;4~ 


19° 
(11) 


M8 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 an 20 
TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 14-Mer-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNAJZQNA2.8L1;4 (11) 
000005 CMP R1,¢5 i INDEX, « 
BLE 2s . 
000000G MOV @HWP . TABLE, (SP) ; 1880 
000000G MOV @MSGO1, -( SP) 
000002 MOV @2,-(SP) 
MOV SP ,RO ; SP,« 
TRAP 14 ; 
000000G MOV @PHYS .ADR, (SP) : 1881 
000001 MOV #1, -C 
MOV SP ,RO ; SP, 
TRAP 14 
0000006 MOV REG.ADR,R1 : 1888 | 
001400 000016 BIS #1400, 16(R1) | 
000005 MOV @5,R2 s ©, $$TMP2 1889 | 
S$: BEQ 83 
0000006 MOV LSOLY,RO ; 6, $STMPL | 
BEQ 7$ 
000014 6%: CLR 14(SP) ; $$TMP 
78: bec Re ; $$TMP2 | 
000002 000010 8s: MOV 2(R1),10(SP) ; ©, TMP LOCATION 1890 | 
000010 MOV 10(SP),RO ; TEMP1,« 1893 
000010 ASH #10,R0 
000000G MOV RO, TEMP1 
000012 MOV (R1),12¢SP) ; ¢, TMP .LOCATION 1892 
0000006 MOV (R11), TEMP2 ; TMP.LOCATION, « 
000006G CLR STATION. ADR+6 ; 1893 
000006G MOVB (R1), STATION. ADR-6 ; TEMP2,¢ 
0000066 BIS RO, STATION. ADR+6 ; TEMP1,« 
001400 000016 BIC 1400. 16(R1) ; 1894 
000000G 000006G om CHECKSUM, STATION. ADR +6 ; 1895 
000000G MOV eMsG59, (SP) : 1898 
000001 MOV @1,-(SP) 
MOV SP RO ; SP, 
TRAP 14 
000000G MOV CHECKSUM, (SP ) ; 1899 
000006G MOV STATION. ADR+6, -( SP) 
000000G MOV @MSG63, -( SP) 
000003 MOV 03,-(SP) 
MOV ° ; SP, 
TRAP 14 
TRAP 55 : 1990 
.WORD 455 
. WORD 
.WORD E1$REPORT 
000010 ADD #10,SP : 1897 | 
000010 9$: ADD #10, : 1644 
TRAP 67 ; 190) | 
ROR RO 
BLO i$ 





— -_ ——_——_— eo 
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Routine Base: ABSCODE$ + 2056 


2 words 


6 words, 
depth per invocetion: 


+ Routine Size: 
+ Meximum steck 


—. 0104 
ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Pege 21 
vo1.0 TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 14-Mer-1985 13:05:35 DISK SUSER2: : (MARSHALL . DEQNA)ZQNA3S.61L1;4 (11) 
' 000374 005037 000000G CLR TEMPS ; 1905 | 
000400 005000 CLR RO ; INDEX 1906 
000402 066037 000000G 000000G 10$: ADD STATION. ADRC( RO), TEMPS ; *CINDEX),« 1908 | 
000410 026027 000000G 177777 CMP STATION. ADR(RO), 6-1 ; *CINDEX),« 1909 
000416 001002 BNE 11% 
0004 005237 000000G INC TEMP4 : 1911 | 
000424 062700 000002 11%: ADD 62,R0 ; *, INDEX 1906 
000430 020027 900004 CMP RO, 04 ; INDEX,« 
000434 003762 BLE 10$ 
000436 005737 000000G TST TEMPS : 1914 | 
000442 001407 BEQ 12% i 
000444 005737 000000G TST TEMP4 $ 1915 | 
©00450 001 BNE 2s 
000452 032737 000400 000000G BIT 0400, STATION. ADR ; 1916 | 
000460 001450 BEQ 
000462 012746 000000G 12%: MOV OMSG59, -( SP) $ 1919 
000466 012746 000001 MOV 61,-(CSP) 
000472 01 MOV SP ,RO ; SP,* 
000474 104414 TRAP 14 
000476 012716 000000G MOV @MSG64 , (SP ) ; 1920 
000502 012746 000001 MOV 61,-(SP) 
000506 010600 MOV RO ; SP,« 
000510 104414 TRAP 
000512 012716 000000G MOV OPHYS . ADR, (CSP) : 1921 
000516 012746 000001 MOV #1,-(SP) 
000522 010600 MOV SP, ; SP,« 
000524 104414 TRAP 14 
000526 104455 TRAP 55 : 1922 
000530 000456 .WORD 456 
000532 000000G . WORD 
000534 000000G -WORD E1$REPORT 
000536 062706 000010 ADD #10,SP ; 1918 
000542 062706 000006 13%: ADO 06,SP ; 1800 
000546 000207 RTS PC 
s Routine Size: 180 words, Routine Base: ABSCODE$ + 1306 
+ Maximum stack depth per invocation: 16 words 
SBTTL T3 TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 
004737 001306’ T3:: 
i$: JSR PC,$T3 ; 1923 
104466 TRAP 66 
006000 ROR RO 
103773 BLO 1$ 
000207 RTS PC 
i 


—— ea mcs ae 


eel 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 


BY 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


mmm em em ee 


SE@ 0105 
VAX-11 Bliss-16 V4.1-562 


+ 


Pp 22 
DISK $USER2 : [MARSHALL .OEQNA)ZQNA3.BLI;4" (11) 


— Stn eae cease eae 
SPSS VFFAeFFeeeeneeGeeeeeeeeeaeeseuaenevaneanunove 
33 
go 
bee ee ee ee bee ee ee be eb be ee be be be be ee ee ee ee ee be ee ee he be he he be be he be be he be be ee be 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 we 23 
TEST 4 - INTERRUPT VECTOR ADDRESS TEST 14-Mar-1985 13:05:35 DISK $USER2: (MARSHALL .DEQNAJZQNA3.BL1;4 (12) 


sSBTTL ‘TEST 4 - INTERRUPT VECTOR ADDRESS TEST’ 
Nga 


TEST 4: INTERRUPT VECTOR ADDRESS TEST 
DESCRIPTION: 


This test verifies that all bits of the vector address register 

can be set end cleared as specified. The host writes data patterns 
to this register and reads them back verifying no static 

(stuck at 1 / stuck at 0) faults occur. If the operator specifies 
loop on error, the program re-executes the code that detected the 
error until tC is entered. 


NOTE: Only bits 9:2 of the Interrupt Vector Address Register are 
velid, rest read as 0. 


The following BINARY date patterns are used: 


00000000 11111111 
10101010 01010101 
11001100 00110011 


11110000 00001111 
walking 1's, 1 propegating thru Vector Address Reg. 
walking O's, O propagating thru Vector Address Reg. 


Hardwere tested: Device Vector Address Register 
Slave Interface Registers 


Processing: 
BEGIN 


reset device 

REPEAT for each pattern 
write pettern to Vector Address Register ( bits 9:2 ) 
read pattern from Vector Address Register ( bits 9:2 ) 
compere write pettern to read pattern (less noise bits) 
IF not equel 
THEN 

5 error message if not inhibited 


ENDREPEAT 
END 


AAAAUAAARADIINSNDRADaSWNWWNWNUNWUW EDI IDAOOD SaWUWUUWUL WU 


—_—_—————— - Se wr rm me me ——tsO 


———~_— a mm — ee see 


DY 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 4 - INTERRUPT VECTOR ADDRESS TEST 


BGNTST; 
RESET_DEQNA C( ); 


See 


! WRITE ALTERNATING O'S AND 1'S TO INTERRUPT VECTOR ADDRESS REGISTER 
! IN THE I/0 PAGE, THEN READ AND COMPARE TO THE WRITE PATTERN 


Sao 
INCR INDEX FROM O TO 7 DO 
BEG 


IN 
TBYTE1 = .PTRN_TABLE [ .INDEX ]; 
BGNSUB ; 
PUT_BIT { INT_VEC, VEC_ADR, .TBYTE1 J; 
——— { INT_VEC, VEC_ADR ] NEQU .TBYTE1 


BEGIN 
PRINTB (€ MSGS59 ); 
PRINTB (€ MSG65 ); 
PRINTB € MSG30, .GET_ADR [ VEC_ALL ]), .TBYTE1, GET_BIT ({ INT_VEC, VEC_AOR ] ); 
ERRDF (€ 0401, MSGOO, ELS$REPORT ); 

END; 

ENDSUB ; 
END; 


WRITE WALKING 1 PATTERN INTO THE INTERRUPT VECTOR ADDRESS IN THE I/0 PAGE 
REGISTER THEN READ AND COMPARE TO THE WRITE PATTERN 


TEMP1 = #6'00000001' ; 
INCR INDEX FROM O TO 7 DO 
BEGIN 


BGNSUB ; 
PUT_BIT { INT_VEC, VEC_ADR, .TEMP1 ]; 
a‘ { INT_VEC, VEC_ ADR ) NEQU .TEMP1 


BEGIN | 
PRINTB ( MSGS9 J); 


¢ 
PRINTB ( MSG65 ); 
€ MSG30, .GET_ADR ( VEC_ALL J), .TEMP1, GET_BIT ({ INT_VEC, VEC_ADR ] ):; 


a ERRDF ( 0402, MSGOO, E1$REPORT ); 
; 
TEMP1 = .TEMP1 ft 1; 


*?¢ 
WRITE WALKING O PATTERN INTO THE INTERRUPT VECTOR ADDRESS IN THE I/0 PAGE 
REGISTER THEN READ AND COMPARE TO THE WRITE PATTERN 


TEMP1 = #66'11111110' ; 


14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 age 
14-Mer-1985 13:05:35 DISK $USER2 : [MARSHALL .DEQNA)ZQNA3.BL1;4 (13) | 


> — — 


SEQ 0107 
p 


———-————— 


i 
. OO OR em ee 


-—_ = _——_—— Qe mee em EE ee ee — _ 


EQ 





CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 “heer” 20 25! 
TEST 4 - INTERRUPT VECTOR ADDRESS TEST 14-Mer-1985 13:05:35 DISK$USER2: [MARSHALL .DEQNA)ZQNA3.BL1I1:4 (13) | 
3 
z INCR INDEX FROM 0 TO 7 DO 
: BEGIN 
& PUT_BIT { INT_VEC, VEC_ADR, .TEMP1 ); 
4, IF GET_BIT { INT_VEC, VEC_ADR ) NEQU .TEMP1 
& THEN 
7 IN 
7 PRINTB ( MSGS9 ); 
7 PRINTB ( MSG6S ); | 
7 PRINTB ( MSG30, .GET_ADR { VEC_ALL ), .TEMP1, GET_BIT { INT_VEC, VEC_ADR ] ); 
7 ERROF ( 0403, MSGOO, E1SREPORT ); 
: END; 
6 TEMP1 = (( .TEMP1 t 1 ) «+ 1 ) AND #0'000377' ; 
4 ENDSUB ; 
: END; 
1 ENDTST; 
.SBTTL $T4 TEST 4 - INTERRUPT VECTOR ADDRESS TEST 
004137 000000G $74: JSR R1, sSAVE2 ; 1925 
162706 000022 SUB #22,SP 
004737 000000G JSR PC,RESET.DEQNA ; 1976 
005001 CLR Ri ; INDEX 1983 
116137 is: MOVB PTRN. TABLECR1), TBYTE1 ; *C( INDEX), + 1985 
05037 000001G CLRB TBYTE1+1 
2$: TRAP 2 
013700 0000006 MOV REG.ADR,RO ; 1987 
013702 000000G MOV TBYTE1,R2 
006302 ASL Re 
006302 ASL R2 
042702 176003 BIC #176003 ,R2 
042760 001774 000014 BIC #1774,14(RO) 
050260 000014 BIS R2,14(RO) 
016016 000014 MOV 14(RO), (SP) ; *, TMP.LOCATION 1988 
013702 000000G MOV TBYTE1,R2 
011600 MOV (SP),RO ; TMP.LOCATION, + 
ASR RO 
0062 ASR RO 
042700 177400 BIC #177400 ,RO 
020002 CMP ; 
001456 BEQ 3$ 
012746 000000G MOV #MSG59, -( SP) : 199) 
012746 000001 MOV #1,-CSP) 
010600 MOV S ® 0 ; SP,* 
104414 TRAP 14 
012716 000000G MOV #MSG65, (SP) ; 1992 
012746 000001 MOV #1,-C(SP) 
010600 MOV SP,RO ; SP, 
104414 TRAP 14 
013700 0000006 MOV REG.ADR,RO ; 1993 


~~ — a ee ee ee 


000014 
000010 


177400 


000000G 
000014 
000014 
000000G 


000004 


000016 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 4 - INTERRUPT VECTOR ADDRESS TEST 


000010 


000014 
000014 


3$: 


4$: 


rg 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


14(RO),10(SP) 
_ 


RO 
#177400,R0 
RO, (SP) 
TBYTE1,-CSP) 


GET.ADR,14(SP) 


#16, 


5 

#MSG59, -CSP) 
#1,-CSP) 

SP ,RO 


14 
#MSG6S , CSP ) 
#1, -(SP) 

SP ,RO 


14 
REG.ADR,RO 


14(RO),16(SP) 


—<A 


SE 
VAX-11 Bliss-16 V4.1-582 prong 26 ! 
DISK$USER2: [MARSHALL .DEQNAJZQNA3.8L1;4 a 


; *,TMP.LOCATION 
; TMP.LOCATION,« 


; *,TMP,LOCATION 
*, TMP .LOCATION 
TMP .LOCATION, * 


; SP,* 
; 1994 
; 1990 
; 1995 
; INDEX 1983 
; INDEX,* 
; 2003 
; *, INDEX 2005 
Fy 2006 
3 2008 
; *, TMP .LOCATION 2009 
; TMP e LOCATION e * 
. 2012 
; SP,* 
: 2013 
; SP,* 

2014 


*, TMP .LOCATION 


. A mn mm 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 4 - INTERRUPT VECTOR ADDRESS TEST 


000016 


000016 
000000G 


000000G 
000014 


000024 


000014 
000014 


000024 


5$: 


6$: 


G9 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


16(SP),RO 
RO 


RO 
#177400,RO0 
» (SP) 
TEMP1, -CSP) 
GET. ADR, 22( SP) 
#14, 22(SP) 
22(SP),-(SP) 
sme 5 eal 


SP ,RO 

14 

55 

622 
MSGOO 
E1$REPORT 


#376, TEMP1 
> ® 

REG. ADR ,RO 
TEMP1 ,R2 
Re 


2 

#176003 ,R2 
#1774,14(RO) 
R2,14CRO) 
14(RO),14(SP) 
TEMP1,R2 
14(SP),RO 

RO 


RO 
#177400 ,RO 
R2 


7 
@MSG59, ~(SP) 
#1, -(SP) 


14 
#MSG65 , CSP ) 
#1,-CSP) 

SP ,RO 

14 

REG.ADR ,RO 
14CRO),24(SP) 
24(SP),RO 


VAX-11 Bliss-16 V4.1-582 age 27! 
DISK $USER2: (MARSHALL .DEQNA)ZQNA3.BL1;4 13) | 


; TMP ‘ LOCATION, * 


*, TMP .LOCATION 
*, TMP .LOCATION 
TMP .LOCATION, * 


SP ,* 


INDEX 


*, INDEX 


*, TMP .LOCATION 
TMP .LOCATION, * 


SP,* 


SP,* 


*, TMP .LOCATION 
TMP .LOCATION, * 


A A —— 


SEQ 0110 
P 


2032 


2035 


2036 


2037 


eee 


lt 


— ———— lana i “a a a ae 


| ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 
vo1.0 TEST 4 - INTERRUPT VECTOR ADDRESS TEST 
000704 006200 ASR 
000706 006200 ASR 
000710 042700 177400 BIC 
000714 010016 MOV 
000716 013746 000000G MOV 
000722 013766 9000000G 000030 MOV 
000730 062766 000014 000030 ADD 
000736 016646 000030 MOV 
000742 012746 000000G MOV 
000746 012746 000004 MOV 
000752 010600 MOV 
000754 104414 TRAP 
000756 104455 TRAP 
000760 000623 WORD 
000762 000000G WORD 
000764 000000G . WORD 
000766 062706 000016 ADD 
000772 013700 000000G 7$: MOV 
000776 006300 ASL 
001000 005200 INC 
001002 005037 000000G CLR 
001006 110037 000000G MOVB 
001012 104467 TRAP 
001014 006000 ROR 
001016 103654 BLO 
001020 005301 
001022 001252 < BNE 
001024 062706 000022 ADD 
001030 000207 RTS 
; Routine Size: 269 words, Routine Base: ABSCODE$ 


; Maximum stack depth per invocation: 21 words 


H9 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


RO 


RO 

#177400 ,R0 

RO, (SP) 

TEMP1, -CSP) 
GET . ADR , 30( SP ) 


MSGOO 

E1$REPORT 

#16,SP 
EMP 


VAX-11 Bliss-16 V4.1-582 


i 
| 


SEQ 0111 
P 


26 
DISK$USER2: (MARSHALL .DEQNAJZQNA3.BLI;4~ (13) 


; *,TMP.LOCATION 
; *,TMP.LOCATION 
; TMP.LOCATION,* 


; SP,* 


; INDEX 


T4 TEST 4 - INTERRUPT VECTOR ADDRESS TEST 


SBTTL 

000000 004737 002072' T4:: 

000000 i$: JSR PC,$T4 
000004 104466 TRAP 66 
000006 006000 ROR RO 
000010 103773 BLO i$ 
000012 000207 RTS PC 

; Routine Size: 6 words, Routine Base: ABSCODE$ + 3124 


; Maximum stack depth per invocation: 2 words 


: 2046 1 


2038 


2034 
2041 


2028 
1925 


—— a ee 


ee ee oe 


~s 
© 
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DEQNA FUNCTIONAL TEST 
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SSBTTL ‘TEST 5 - BOOT/DIAGNOSTIC PROM CHECKSUM TEST’ 


See 


DESCRIPTION: 
This test verifies thet the contents of the on-board ROM 


Herdwere tested: 


BOOT/DIAGNOSTIC PROM CHECKSUM TEST 


tic ROM) cen be loeded to the host memory correctly. 


Checksum is generated from the ROM dete read and this checksum is 
compered to the checksum stored in the last word location of the 
on-board ROM. If the operator specifies loop on error, the program 
re-executes the code that detected the error until tC is entered. 


Q-Bus to DMA interface 
18051 microprocessor 
coe ROM 

ister 
enacted FIFO 


Processing: 
BEGIN 


reset device 
setup Receive Descriptor List(s) 
set Boot/Di agnostic and External loopback bits 

This moves ROM boot code into receive FIFO 
weit 10 msec. or until RL € bit 5 in CSR ) = O 
check CSR status ( bit 5 ) and RCV Descriptor List status 
IF error 
THEN 

Sa error message if not inhibited 


clear Boot/Diagnostic ROM bit in CSR 

This moves contents of FIFO to host memory 
wait 10 msec. or until RCV Descriptor status changed 
A in stetus 


“Sigg error message if not inhibited 


compute ROM checksum and compare to checksum read from ROM 
IF not equel 
THEN 

print error message if not inhibited 

IF 


END 


CZQNADO 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 age 
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 14-Mar-1985 13:05:35 § DISK$USER2: [MARSHALL .DEQNA)ZQNA3.BLI;4 


om mm ee © — — 


SEQ 0112 
P 


‘ 
i 
f 
i 


29 
(14) 


———— 


xX—— er ee ee te 


rr Se err -* - -- 


. eT . 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 14-Mar-1985 13:05:35 


BGNTST; 


RESET_DEQNA (€ ); 
CLR_BUFFERS ( 2 * K ); 


lee 
: COPY BOOT/DIAGNOSTIC PROM DESCRIPTOR LIST INTO WORK AREA 


INCR INDEX FROM O TO BD_D_SIZE - 1 DO 
DESCR_LIST { .INDEX, W_LEN ] = .BD_PROM_DESCR [ .INDEX ]; 


-IOP_TABLE { RLO_ADR ] = . D_LIST; 
-IOP_TABLE ({ RHI_ADR ] = 


PUT_BIT € CSR, LB, EXT_LOOPBACK ); 
PUT_BIT € CSR, BO, SET_IT 3; 


DELAY ( K ); 
INCR INDEX FROM 0 TO TIMES_LIMIT DO 
7 a" _BIT { CSR, RL ) EQLU ZERO 


BEGIN 
TEMP1 = . INDEX; 
EXITLOOP ; 

END 


ELSE 
IF .INDEX EQLU TIMES_LIMIT 
THEN 


); 
PRINTB ( MSG66, GET_BIT { CSR_ALL ] ); 
ERRDF (€ 0501, MSGOO, ERRORSREPORT ); 


END; 
VER_DESCR_STATUS ( ); 


fee 
! FINISH BOOT/DIAGNOSTIC PROM UPLOAD 


PUT_BIT ( CSR, BD, CLR_IT ); 
DELAY € K ); 


CHECK IF RECEIVE STATUS CHANGED 


VER_DESCR_STATUS ( ); 
RESET_DEQNA ( ); 
TEMPS = 0; 


VAX-11 Bliss-16 V4.1-582 age 
DISK$USER2: [MARSHALL . DEQNA )ZQNA3 .BLI;4 
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SEQ 0113 
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SEQ 0114 
VAX-11 Bliss-16 V4.1-582 


CZQNADO DEQNA FUNCTIONAL Page 31 
DISK$USER2: [MARSHALL .DEQNA)ZQNA3.B8L1;4~ (15) | 


TEST 
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 


oom oo <>- —_—- 


TEMPS = -DATA_BUFFER ( CHSUM OFFSET oa ds 

TEMPS = ( .TEMP3 +t 8) A 

TEMP3 = .DATA BUFFER ( CHSUM, OFFSET’ } + .TEMP3; 

TEMP2 = .DATA_ BUFFER ( TEMPS > | 
TEMP2 = ( .TEMP2 t 8 ) AND SX'FFOO'; 
TEMP2 = .DATA "BUFFER ( ‘TEMPS } + . TEMP2; | 
COUNTER = O; ) 
CHECKSUM = 0; 


INCR INDEX FROM 0 TO PROM_SIZE - 2 DO 
IF .COUNTER EQLU . TEMPS 


THEN 
COUNTER = .COUNTER + 2 
ELSE 
BEGIN 
CHECKSUM = .CHECKSUM + ( .DATA_BUFFER [ .COUNTER ] AND #X'FF’ ); 
COUNTER = .COUNTER + 1; 
END; 
- Sf ee EQLU ZERO ) OR € .TEMP2 NEQU .CHECKSUM ) 
BEGIN 
CSR_WORD = GET_UIT ( CSR_ALL ); 
PRINTB ( MSGS9 ); 
PRINTB € MSG67, .TEMP3, .TEMP2, .CHECKSUM ); 
ERRDF ( 0502, MSGOO, E1$REPORT); 
END; 
ENDTST; 
.SBTTL $75 TEST 5 - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 
$TS: JSR R1, $SAVES ; 2045 
000010 SUB #10, 
JSR PC ,,RESET.DEQNA : 2096 
004000 MOV #4000, - (SP) ; 2097 
000000G JSR PC,CLR. BUFFERS 
CLR RO INDEX 2103 
000000G 000000G i$: MOV BD. PROM. DESCR(RO),DESCR.LIST(RO); *( INDEX), «C INDEX) 2104 
000002 ADD #2,R0 3; *, INDEX 2103 
000036 ay oF ; INDEX, x 
000000G 000004G MOV @RCV.D.LIST,@IOP. TABLE +4 : 2106 
000006G CLR @IOP . TABLE +6 ; 2107 
000000G MOV REG. ADR,RO ; 2109 
001410 000016 BIS #1410, 16(RO) 3 2110 
002000 MOV #2000.R1 ; *,$$TMP2 2112 
2$: BEQ S$ 
000000G MOV L$DLY,RO ; *, $$TMP1 
BEQ 4$ 
000010 3$: CLR 10( SP) ; $$TMP | 


- —— a TL  ——__ LL A  me —_—-—- - - —_—— See 


Lg | 


SE 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 . Ang 32 
TEST 5S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 14-Mar-1985 13:05:35 DISK$USER2: : (MARSHALL. DEQNA)ZQNA3.BL1I;4 (15). 
SOB RO, 34 ; $$TMP1,« | 
4s: O&C Ai s $$TMP2 : 
BR 23 | 
S$: CLR R1 § INDEX 2113 | 
000000G 6$: MOV REG.ADR,RO | 2114 
000016 000002 MOV 16CRO), 2(SP) g ©, TMP.LOCATION 
000040 000002 a 040, 2(5P) 5 *,TMP.LOCATION 
000000G MOV R11, TEMP1 3 INDEX,+# 2117 | 
BR 7) ; 2116 | 
002000 7$: a Ri, #2000 ; INDEX,* 2121 | 
000000G MOV @#MSG5S9, (SP) ; pone 
000001 MOV #1,-CSP) | 
MOV SP ,RO r] SP ,* 
TRAP 14 
000000G MOV ; 2125 
000016 000006 MOV 16CRO),6CSP) ; *, TMP .LOCATION 
oo 6 Py i TMP .LOCATION, « 
000002 MOV #2,-CSP) 
MOV SP,RO 3 SP ,* ‘ 
TRAP 14 
TRAP 55 s 2126 
. WORD 765 
.WORD MSGOO 
. WORD ERRORSREPORT 
000006 ADD #6 , SP ; 2123 
8$: INC Ri ; INDEX 2113 
002000 ip * peta ; INDEX,+¢ 
000000G 9$: JSR PC, VER.DESCR.STATUS 8 2129 
000000G MOV REG.ADR,RO 3 2135 
000010 000016 BICcB #10, 16CRO) 
002000 MOV #2000 ,R1 ; *,$$TMP2 2136 
10$: BEG i3$ 
000000G MOV LSOLY,RO ; *,$$TMPl 
BEQ i2$ 
000010 11$: CLR 10¢ SP) ; $$TMP 
Sos RO,11% ; $$TMPl,= 
12$: DEC Ri ; $$TMP2 
BR 10% 
000000G 13%: JSR PC. VER.DESCR.STATUS : 2142 
000000G JSR PC ,RESET.DEQNA 3 2144 
000000G CLR TEMPS ; 2147 
000007G 000000G MOVB DATA.BUFFER-7, TEMPS 
000000G MOV TEMP3,RO ; 2148 
000010 ASH #10,R0 
000000G MOV RO, TEMPS 
000377 0000006 BIC 0377, TEMPS 
CLR RO ; 2149 ! 
000006G BISB DATA.BUFFER-6,RO ' 
0600000G ADD RO, TEMPS 
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CZQNADO DEGNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 any 33 
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 14-Mer-1985 13:05:35 DISK SUSER2: (MARSHALL .DEQNA)JZQNA3.6L1;4 (15) 
013701 000000G MOV TEMPS ,R1 ; 2151 | 
116137 000001G 000000G MOVB DATA.BUFFER+1(R1), TEMP2 
105037 000001G CLRB TEMP2+1 
013700 MOV TEMP2 ,RO $ 2152. 
072027 000010 ASH #10,RO0 
010037 MOV RO, TEMP2 
042737 000377 000000G BIC 6377, TEMP2 
CLR RO $ 2153 
156100 000000G BISB DATA.BUFFERCR1),RO 
660037 000000G ADD RO, TEMP2 
005037 000000G CLR COUNTER | 2155 | 
005037 000000G CLR CHECKSUM 5 2156 | 
012702 007777 MOV 07777 ,R2 ; *, INDEX 2158 | 
013700 14%: MOV COUNTER ,RO $ 2159 | 
CMP Ri 
001 BNE 15$ 
062737 000002 000000G ADD 62, COUNTER ; 2161 | 
000407 BR 16% $ 2159 | 
005003 15$: CLR RS : 2164 
156003 000000G B1IS6 DATA. BUFFER(RO),R3 
060337 000000G ADD » CHECKSUM 
005237 000000G INC ; 2165 
077220 16%: $08 R2,14$8 ; INDEX, 2158 
013700 000000G MOV TEMP2 ,RO : 2168 
001403 BEQ 17% 
020037 000000G CMP RO, CHECKSUM 
001440 BEQ 18% 
013700 000000G 17$: MOV REG. ADR ,RO $ 2171 
016066 000016 000006 MOV 16( RO), 6( SP) ; *, TMP .LOCATION 
016637 000006 000000G MOV 6(SP),CSR.WORD ; TMP .LOCATION, « 
012716 000000G MOV 9,(SP) : 2172 
012746 000001 MOV 61,-C(SP) 
010600 MOV SP RO ; SP,« 
104414 TRAP 14 
013716 000000G MOV CHECKSUM, (SP) : 2173 | 
013746 000000G MOV TEMP2, -( SP) 
013746 000000G MOV TEMPS, -( SP) 
012746 000000G MOV 7,-CSP) 
012746 000004 MOV 04,-(CSP) 
01 MOV SP ,RO : SP 
104414 TRAP i4 
104455 TRAP 55 : 2174 
000766 WORD 766 
000000G . WORD 
000000G .WORD E1SREPORT 
062706 000012 ADD #12,SP 3 2170 
062766 000012 18$: AOD 612,SP ; 2045 | 
000207 RTS PC | 
s Routine Size: 210 words, Routine Base: ABSCODES + 3140 | 
: Meximum steck depth per invocation: 16 words , 
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SEQ 0117 
ZQNA3 CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-5862 gee 34 
vo1.0 TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 14-Mar-1985 13:05:35 DISK $USER2: (MARSHALL .DEQNAJZQNA3.8L1;4 (15) 


.SBTTL 1S TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST ! 
004737 003140° 1S:: 


999009 

000000 1$: JSR PC,$T5 i 2175 
000004 104466 TRAP 66 ’ 
000006 006000 ROR RO 
000010 103773 BLO 1$ 

000012 000207 

| 


1 Routine Size: 6 words, Routine Bese: ABSCODE$ + 4004 
; Maximum steck depth per invocation: 2 words 


——— — 


eR 


ue) 
% 
Pe ee be be fae be bee fe bee fe fee bee he bee ee ee bee ee ee Bee ee ee ee ee ee ee ee ee er ee 


1 ee 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16  VAX-11 Blies-16 v4.1-582 “=~ - 
TEST 6 - INTERRUPT SANITY TEST 14-Mar-1985 13:05:35  DISKSUSER2: (MARSHALL .DEQNAJZONA3.BL1;4" (16) 


SSBTTL ‘TEST 6 - INTERRUPT SANITY TEST’ 


TEST 6: INTERRUPT SANITY TEST 
DESCRIPTION: 


This test verifies thet DEQNA interrupts the processor only st 
the expected level ( 4 ) and not any other level. If the operator 
specifies loop on error, the _progrem re-executes the code that 
detected the error until tC is entered. 


Herdwere tested: Q-Bus to QTOC interface 
CSR register 
Q-Bus timeout logic 
QTOC interrupt logic 
Processing: 


BEGIN 
reset device 
poste for NXM interrupt 
for eech processor priority level 

eneble device interrupt (set CSR bit 6) 
force NXM inter 
check for expected CSR stetus 
IF error 
THEN 


print error message if not inhibited 
ENOIF 
ENDREPEAT 


' 
ee ce eee ee 


aS] 
~ 
w 
~ 
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CZQNADO DEQNA FUNCTIONAL TEST 


TEST 6 - INTERRUPT SANITY TEST 

BGNTST; 

RESET_DEQNA ( ); 

SETVEC € .HWP_TABLE [ VEC ], NXM_INT, PRIO7 ); 
.IOP_TABLE ({ INT_VEC ] = .HWP_TABLE [ VEC ]; 


TMP_IOP_ADR = .HWP_TABLE [ ADDR ]); 
COUNTER = O; 


——— FROM PRIOO TO PRIO7 BY #0'40' DO 


meme me er ee ee —— —— 


C10 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


E 
VAX-11 Bliss-16 V4.1-582 . -¥ 36 
DISK $USER2: (MARSHALL . DEQNA)ZQNA3.BLI; a. (17) 


! SET UP FOR AN NXM INTERRUPT 


SETPRI ( .PRIORITY ); 
BGNSUB ; 
PUT_BIT € CSR, IE. SET_IT ); ' ENABLE INTERRUPTS 
DELAY ( 5 ); ! 
INTERRUPT -FLG = CLEAR_FLG; 
.IOP_TABLE [ XLO_ADR ] = NXM_LO_ADR; ! WRITE LOW ADDRESS 
.IOP_TABLE { XHI_ADR ] = NXM_HI_ADR; ! WRITE HIGH ADDRESS 
DELAY (€ 2 ); 
GETPRI ( TEMP1 ); 
TEMP1 = .TEMP1 t ( - 5S ); 
IF .INTERRUPT_FLG EQLU WORD_LIMIT 
THEN ! INTERRUPT SHOULD NOT OCCUR 
IF .PRIORITY GTRU PRIO3 
THEN 
BEGIN 
PRINTB ( MSGS9 ); 
PRINTB ( MSG69, TMP _IOP_ADR, .TEMP1, .COUNTER ); 
a” ( 0601, MSGOO, E1$REPORT ): 
3 


ad ~ weomsbindens EQLU ZERO 
ae” LEQU PRIOS 


! INTERRUPT SHOULD OCCUR 


HEN 
— { FLGWD }] AND XFLG_MASK ) NEQU XFLG_MASK 


BEGIN 
PRINTB ( MSG59 ); 
PRINTB ( MSG69, .TMP_IOP_ADR, .TEMP1, .COUNTER ); 
ERRDF ( 0602, MSGOO, E1SREPORT ); 


END; 
RESET_DEQNA ( ); 


ENDSUB ; 
COUNTER = .COUNTER «+ 1; 


END; 
SETPRI ( PRIOS ); 
ENDTST; 


| 

! SET PROCESSOR PRI LEVEL 
! SET PROCESSOR PRI LEVEL 
| 

| 

| 


————_ 
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SEQ 0 | 
VAX-11 Bliss-16 V4.1-582 P og 37 
) 


DEQNA FUNCTIONAL TEST age 
DISK $USER2: [MARSHALL . DEQNA]ZQNA3. BLI;4 (17 


CZQNADO 
TEST 6 - INTERRUPT SANITY TEST 


-SBTTL $16 TEST 6 - INTERRUPT SANITY TEST 
JSR AVE2 


0000006 $T6: S , ; 2177 
TST -(SP) 
0000006 JSR PC,RESET.DEQNA ; 2214 
0000006 MOV #PRIO7, -(SP) ; 2215 
0000006 MOV @NXM. INT, -(SP) 
000000G MOV HWP. TABLE ,R 
000002 MOV 2(RO),-CSP) 
000003 MOV #3,-CSP) 
TRAP 37 
MOV HWP. TABLE ,RO ; 2216 
000002 000014G MOV 2(RO), @10P. TABLE +14 
0000006 MOV HWP. TABLE, TMP. IOP. ADR ; 2217 
0000006 CLR COUNTER ; 2218 
0000006 - amao0 Re ; *,PRIORITY 2220 
i$: MOV R2,RO ; PRIORITY, * 2222 
TRAP 41 
2$: TRAP 2 
MOV REG.ADR,RO ; 2224 
000100 000016 BISB #100, 16(RO) 
MOV 2 ; *,$$TMP2 2225 
3$: BEQ 6$ 
000000G MOV L$DLY,RO ; *,$$TMP1 
BEQ S$ 
000010 4$: CLR 10(SP) ; $$TMP 
Sob RO,4$ ; $$TMP1,* 
S$: DEC Ri ; $$TMP2 
BR 3$ 
6$: CLR INTERRUPT .FLG : 2226 
160000 000010G MOV #-20000, @I0P. TABLE+10 ; 2228 
000077 000012G MOV #77, @I0P. TABLE+12 : 2229 
, MOV #2,R1 ; *, $$TMP2 2231 
7$: BEQ 10$ 
0000006 = L#DLY.RO ; *,$$TMP1 
000010 8: CLR 10(SP) ; $$TMP 
S0B RO,8$ ; $$TMP1,« 
9$: DEC Ri ; $$TMP2 
BR 7$ 
10$: TRAP 40 ; 2232 
177773 ASH #-5,R0 ; 2233 
000000G MOV RO, TEMP1 
000000G 177777 a PEMMPT .FLG. 0-3 : 2235 
000000G CMP R2, #@PRIO3 ; PRIORITY,+* 2237 
BLOS 11$ 
0000006 MOV #MSGS9, (SP) ; 2240 
000001 MOV #1,-CSP) 
MOV SP ,RO . SP ,* 
TRAP 14 





—_— —$ 
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SEQ 0121 | 








CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 38! 
TEST 6 - INTERRUPT SANITY TEST 14-Mar-1985 13:05:35 | DISK$USER2: (MARSHALL .DEQNAJZQNA3.BL1;4 a (17) | 
013716 900000G MOV COUNTER , (SP) i 2241 
013746 000000G MOV TEMP1,-CSP) 
013746 000000G MOV TMP .IOP.ADR, -C SP) 
012746 9000000G MOV #MSG69 , -C SP) 
012746 000004 MOV 04,-(S 
010600 MOV SP ,RO ; SP,* 
104414 TRAP 14 
104455 TRAP 55 ; 2242 
001131 -WORD 1131 
-WORD MSGOO 
-WORD E1$REPORT 
062706 000012 ADD #12,SP ; 2239 
005737 11$: TST INTERRUPT .FLG ; 2245 
001042 BNE 12% 
7 000000G CMP R2,@PRIO3 ; PRIORITY,+* 2247 
101037 BHI 12$ 
013700 MOV XMIT.D.LIST,RO ; 2249 
042700 037777 BIC #37777 ,RO0 
020027 1 CMP RO, @-40000 
001430 BEQ 23 
012716 0000006 MOV @MSGS9, (SP) ; 2252 
012746 000001 MOV #1,-CSP 
010600 MOV SP,RO ; SP,* 
104414 TRAP 14 
013716 000000G MOV COUNTER , (SP) 5 2253 
013746 000000G MOV TEMP1,-CSP) 
013746 000000G MOV TMP .IOP.ADR, -CSP) 
012746 000000G MOV @MSG69, - (SP) 
012746 000004 MOV #4,-( 
010600 MOV SP,RO ; SP,* 
104414 TRAP 14 
104455 TRAP 55 ; 2254 
001132 -WORD 1132 
-WORD MSGOO 
-WORD E1$REPORT 
062706 000012 ADD #12,SP : 2251 
004737 000000G 12$: JSR PC,RESET .DEQNA ; 2256 
104467 TRAP 67 
006000 ROR RO 
103616 BLO 23 
005237 000000G INC COUNTER ; 2258 
062702 000040 ADD #40 ,R2 ; *,PRIORITY 2220 
020227 060000G 13$: CMP R2, #PRIO7 ; PRIORITY, +* 
003605 BLE 1$ 
012700 000000G MOV #PRIO3,RO : 2261 
104441 TRAP 41 
062706 000012 ADD #12, SP ; 2177 
000207 RTS PC 





Routine Base: ABSCODE$ + 4020 


15 words 


+ Routine Size: 158 words, 
; Meximum steck depth per invocation: 


F10 


J SE 
| ZQNAS CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 “a. ° 9 | 
v01.0 TEST 6 - INTERRUPT SANITY TEST 14-Mer-1985 13:05:35 DISK$USER2: : (MARSHALL . DEQNA )ZQNA3. BLI;4> (173 

.SBTTL T6 TEST 6 - INTERRUPT SANITY TEST 
000000 004737 9040270' T6:: 
000000 1$: JSR PC,$T6 | 2261 ' 
000004 104466 TRAP 66 
000006 006000 ROR RO 
000010 103773 BLO i$ 
000012 000207 RTS PC 
; Routine Size: 6 words, Routine Base: ABSCODE$ + 4514 


; Meximum steck depth per invocation: 2 words 


$ 2264 1 
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CZQNADO DEQNA FUNCTIONAL TEST 
TEST 7 - ETHERNET CARRIER SENSE TEST 


- ee ne ee 


G10 


14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 


SSBTTL ‘TEST 7 - ETHERNET CARRIER SENSE TEST’ 


tee 


TEST 7: ETHERNET CARRIER SENSE TEST 
DESCRIPTION: 


This test verifies that the DEQNA can transmit external loopback 
peckets and if not faulty FRU is can be found by executing this 
by implementing the instructions printed on the operator's console. 


In order to run this test successfully the operator has to make 

sure that DEQNA is connected to the transceiver. If the operator 
specifies loop on error, the program re-executes the code that detected 
the error until tC is entered. 

Herdware tested: Cerrier Sense circuitry 
Encode/Decode ( ED ) chip 


Processing: 


BEGIN 

reset device 

select external loopback mode 

check external hardware 

IF bad hardware 

THEN 
print error message if not inhibited 

ENDIF 

read CSR 

i Carrier Sense bit ( bit 13 ) = 1 
oo error message if not inhibited 


transmit 1 st unchained loopback packet ( ETHERNET format ) 
read CSR while transmitting loopback packet 

4 Ethernet Carrier Sense bit (bit 13) = 0 

HEN 


print error message if not inhibited 


ELSE 
pore until Cerrer Sense bit goes to 0 
I 


read CSR 
c— Cerrier Sense bit (bit 13) = 1 


print error message if not inhibited 
ENDIF 
END 


14-Mar-1985 13:05:35 DISK $USER2: [MARSHALL .DEQNAJZQNA3. 


SEQ 0123 
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CZQNADO DEQNA FUNCTIONAL TEST 
- ETHERNET CARRIER SENSE TEST 


TEST 7 

BGNTST; 

IF .SWP_ILOOP 
THEN 


BEGIN 
RESET 


-~DEQNA ( ); 
IF (NOT GET_ BIT { CSR, xC ] ) AND ¢ 


H10 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


.SWP_LBC EQLU ZERO ) 


BEGIN 
CSR_WORD = GET_BIT 3 tes ALL ]; 
SELECTONE .XC_FLAG 
SET 
0): 
BEGIN 
XC_FLAG = .XC_FLAG «+ i; 
PRINTB ( MSG59 ); 
PRINTB (€ MSG47 ); 
ERRDF (C( 0704, MSGO0, ERROR$REPORT ); 
END; 
BEGIN 
XC_FLAG = ZERO; 
PRINTB ( MSGS59 ); 
PRINTB (€ MSG42 ); 
ERRDF C( 0705, MSGOO, ERRORS$REPORT ); 
END; 
TES; 
EXIT_TST; 
END 


ELSE 
XC_FLAG = ZERO; 


lee 


RESET_DEQNA ( ) 


PREP_FOR_SETUP 


; 
C ); 


INCR INDEX1 FROM 1 TO 14 DO 
WRT_STATION_ADR € .INDEX1, PHA_INDEX ); 


BGNSUB ; 
XMIT_SETUP_PACKET ( N_MODE ); 
ENDSUB 


ERR_FLAG = ZERO; 
INCR INDEX2 FROM O TO 19 DO 


BEGIN 


SEND_TEST_PACKET (€ ); 
DELAY ( 100 ); 


CSR_WORD = 
IF (¢ 


.CSR_WORD AND #0’ 100220' 


GET _BIT € CSR_ALL ); 
) EQLU #0'100220' 


re er re | ee ee — ~_-— 


VAX-11 Bliss-16 V4.1-5862 


! RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING 
__ TESS IN EXTERNAL LOOPBACK MODE. 


— + 
DISK$USER2: [MARSHALL .DEQNAJZQNA3.6LI;4~ 


4 
(19) 
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CZQNADO DEQNA FUNCTIONAL TEST 
TEST 7 - ETHERNET CARRIER SENSE TEST 


THEN 
BEGIN 
ERR_FLAG = ZERO; 
EXITLOOP ; 
END 


ELSE 
ERR_FLAG = ONE; 
: 


IF .ERR_FLAG 
THEN 
BEGIN 
SELECTONE .ERR_COUNT OF 
SET 
0 ) 
BEGIN 
ERR_COUNT = 1; 
PRINTB (€ MSGS9 ); 
PRINTB (€ MSG35 ); 
PRINTB (€ MSG36 ); 
ERRDF (C 
END; 
[ 3 gs 
N 
4 T = 2; 
PRINTB (€ MSGS59 ); 
PRINTB (€ MSG37 ); 
PRINTB (€ MSG38 ); 
ERRDF ( 0707, MSGOO, 
END; 
{ 2): 
BEGIN 
ERR_COUNT = 3; 
PRINTB ( MSGS9 ); 
PRINTB (€ MSG39 ); 
PRINTS € MSG40 ); 
€ 0708, MSGOO, 
END; 
{3}: 
BEGIN 
_COUNT = QO; 
PRINTB ( MSGS5S9 ); 
PRINTB € MSG41 ); 
ERRDF (€ 0709, MSGOO, 
END; 
{ 4]: 
BEGIN 
ERR_COUNT = O; 
PRINTB ( MSGS5S9 ); 
PRINTB ( MSG45 ); 
ERRDF (€ 0710, MSGOO, 
END; 
TES; 


14-Mar-1985 13:11:16 
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ERRORSREPORT ); 


ERRORSREPORT ); 


ERROR$REPORT ); 


ERROR$REPORT ); 


ee | ——_— —_—_— 


SEQ 0125. 


VAX-11 Bliss-16 V4.1-582 Page 42° 
DISK $USER2: (MARSHALL .DEQNAJZQNA3.8L1;4 (19) | 


me ee ee ee ee po eEEEEEEEEeSuqQeEeeeeee as 


NNN NNN SSNS SSO DSS SHSHSUUUGAAAAAUUG*MWAAHUUGKARAOHUUUUUA SOU 


med ec.ccccC ALL ele 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 7 - ETHERNET CARRIER SENSE TEST 


EXIT_TST; 
END 


ELSE 
IF .ERR_COUNT GTRU ZERO 
THEN 


BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
SELECTONE .ERR_COUNT OF 
SET 
{ 1): 
BEGIN 
ERR_COUNT = 4; 
PRINTB (€ MSG59 ); 
PRINTB (€ MSG43 ); 
PRINTB (€ MSG44 ); 
ERRDF C O711, MSGOO, 
END; 
{ 2.3 ): 
BEGIN 
ERR_COUNT = O; 
PRINTB ( MSGS9 ); 
PRINTB € MSG42 ) 


$ 
ERRDF (€ 0712, MSGOO, 
END; 


{ 4]: 
BEGIN 
= 0; 


ERR_COUNT 

PRINTB € MSG59 ); 

PRINTB (€ MSG46 ); 

ERRDF ( 0713, MSG00, 
END; 


TES; 
EXIT_TST; 
é 


XC_FLAG = ZERO; 
ERR_COUNT = ZERO; 


BGNSUB ; 
INCR INDEX2 FROM O TO TIME1_LIMIT DO 
BEGIN 
RESET_DEQNA (€ ); 
TEMPS = .INDEX2; 


fee 


J10 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


ERROR$REPORT ); 


ERROR$REPORT ); 


ERRORSREPORT ); 


_—_——~ — er eee - 


SEQ a 4 


VAX-11 Bliss-16 V4.1-582 
DISK $USER2 : [MARSHALL . DEQNAJZQNA3. eLt;a" 


! CHECK ETHERNET CARRIER SENSE BIT (€ CA - BIT 13 ) IN THE CSR. CA SHOULD BE 


. ae oe 
ee 
SEND_TEST_PACKET ( ); 

INCR INDEX FROM O TO TIME1_LIMIT DO 


WHILE THE DEQNA IS TRANSMITTING. IF CA ISN'T SET TO ‘1’ WITHIN 
! THE EXPECTED TIME LIMIT, ERROR MESSAGE IS PRINTED OUT. 


errr ee en ee Mer - 


(19) 


DAD NOOO NNN SSI O99 0 44 O90 O SAI INN OOOO OOO~~ 


———— ee ee ee ee 


K10 


SEQ 0127 Pt 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 


Page 
TEST 7 - ETHERNET CARRIER SENSE TEST 14-Mar-1985 13:05:35 DISK$USER2: [MARSHALL . DEGNA JZQNA3. BLI; ae 


IF GET_BIT { CSR, CA ] EQLU ONE 
THEN 


BEGIN 
TEMP2 = GET_BIT ( CSR_ALL J; 
Bi LOOP ; 


E 

ELSE 

IF .INDEX EQLU TIME1_LIMIT 
THEN 


BEGIN 
PRINTB ( MSGS59 ); 
PRINTB ( MSGi9, GET_BIT ( CSR_ALL ] ); 
“a” € 0701, MSGOO, ERROR$REPORT ); 
; 


See 

! NOW CHECK IF THE CA BIT RESETS TO '0O' WHEN THE DEQNA COMPLETES TRANSMITTING 
! LOOPBACK PACKET. PRINT ERROR MESSAGE IF LOOPBACK PACKET TRANSMISSION 

: EXCEEDS SELECTED TIME LIMIT. 


INCR INDEX FROM O TO TIME2_LIMIT DO 
. { CSR, CA ] EQLU ZERO 


BEGIN 
TEMPS = GET_BIT ( CSR_ALL J; 
EXITLOOP ; 


ELSE 
IF .INDEX EQLU TIME2_LIMIT 
THEN 


BEGIN 
PRINTB ( MSGS9 ); 
PRINTS ( MSG20, GET_BIT ( CSR_ALL J ); 
ERRDF (€ 0702, MSGOO, ERRORSREPORT ); 


tes 


! CHECK RECEIVE INTERRUPT REQUEST BIT ( RI - BIT 15 ) TO VERIFY THAT DEQNA 
! ACTUALLY TRANSMITTED LOOPBACK PACKET. 


DELAY (€ 50 ); 
IF GET_BIT { CSR, RI ) EQLU ONE 
THEN 
BEGIN 
TEMP4 = GET_BIT [ CSR_ALL ]; 
EXITLOOP; 
END; 
END; 


IF .TEMPS EQLU TIME1_LIMIT 


Re A EN I mt = 


— ee ee mm 


(19) 


————————— 


: 


PARADIS DADAHHAHAHHAHDDSD SII IHMHOSH sag 


CZQNADO DEQNA FUNCTIONAL TEST 


L10 


14-Mar-1985 13:11:16 


SEQ 0128 


VAX-11 Bliss-16 V4.1-582 Page 
DISK $USER2 : [MARSHALL . DEQNA )ZQNA3.BL1;4 


TEST 7 - ETHERNET CARRIER SENSE TEST 14-Mar-1985 13:05:35 
THEN 
BEGIN 
PRINTB ( MSGS59 ); 
PRINTB ( MSG21, GET_BIT [ CSR_ALL ]) ); 
ERRDF ( 0703, MSGOO, ERRORSREPORT ); 
END; 
F ie ose { ERRSU ) EQLU 1 ) AND ( .XMIT_DO_LIST ({ ABORT ) EQLU 1 ) 
BEGIN 
PRINTB ( MSGS59 ); 
PRINTB ( MSG71 ); 
ERRDF ( 0714, MSGOO, ERRORSREPORT ); 
END; 
COMPARE STATUS REGISTERS TO EXPECTED VALUES 
= 
CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK d:; ! 0'100220', 0'100220' 
XMIT_D_LIST { STWO1 ) = .XMIT_D_LIST ( STWD1 } AND #0’ 177377' ; 
CHK_XMIT_STATUS ( XFLG _STATUS, XWD11_STATUS ); ! 0'140000', 0: 000000’ 
CHK_RCV_STATUS ( RFLG_STATUS, RWD1_ STATUS ); ' 0' 140000’. 0‘ 020000’ 
IF .XMIT_D_LIST ( TOR J) EQLU ZERO 
THEN 
BEGIN 
PRINTB (€ MSG59 ); 
PRINTB ( MSG58 ); 
ERRDF ( 0715, MSGOO, ERRORSREPORT ); 
END; 
ENDSUB ; 
END; 
ENDTST; 
-SBTTL $T7 TEST 7 - ETHERNET CARRIER SENSE TEST 
$77: JSR R1, $SAVE2 ; 
000034 SUB #34 ,SP 
000001 000000G oon #1,SWP .ILOOP : 
000000G JSR PC RESET .DEQNA ; 
00000 0G MOV REG .ADR ,RO : 
000016 MOV 16(RO), (SP) ; *, TMP .LOCATION 
010000 aoe a » (SP) ; *, TMP .LOCATION 
000000G TST SWP .LBC 
BNE 5$ 
000002 MOV (SP),2CSP) ; *,TMP.LOCATION 
000000G MOV (SP),CSR.WORD ; TMP .LOCATION, 
000000G MOV XC.FLAG,RO ; 


45 
C19) ° 


<A. i i a 


\ 
e 


012702 


DEQNA FUNCTIONAL TEST 


CZQNADO 
TEST 7 - ETHERNET CARRIER SENSE TEST 


000000G 
000000G 
000001 


000000G 
000024 


i$: 


6$: 


7$: 


ee a eee 


M10 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


PC RESET .DEQNA 
PC. PREP .FOR. SETUP 


023,-(SP) 

PC ,.WRT.STATION. ADR 
(SP)+,(SP)- 

Ri 

R1,016 

6$ 

2 

$205, -(SP) 

PC, XMIT. SETUP .PACKET 
(SP )- 


ERR .FLAG 
#24 ,R2 


VAX-11 Bliss-16 V4.1-582 


¢, INDEX1 
INDEX1,¢ 


INDEX1 
’ INDEX1,¢ 


+, INDEX2 


SES 0129 
DISK$USER2: (MARSHALL .DEQNAJZQNA3.8L1;4~ 


ee nr eee 


46 
(19) 


wv 
va 
Vi 
“i 


- es * = — errr Ae —_—— —_——- wow ae eS 


N10 


14-Mar-1985 13:11:16 
14-Mer-1985 13:05:35 


SEQ 013 
CZQ@NADO DEQNA FUNCTICNAL TEST 130 
TEST 7 - ETHERNET CARKTER SENSE TEST 


VAX-11 Bliss-16 V4.1-582 





Page 47 
DISK $USER2: (MARSHALL .DEQNA)ZQNA3.BL1;4 (19) 


000000G 8$: JSR PC, SEND. TEST. PACKET ; 2363 | 
000144 MOV 144,R1 ; *,$$TMP2 2364 | 
9$: BEQ 12$ | 
000000G MOV L$DLY,RO ; *,$$TMPL : 
BEQ 11$ 
000032 10$: CLR 32(SP) ; $$TMP ! 
SOB RO,10$ ; $$TMP1,*« 
11s: DEC R1 ; $$TMP2 ! 
BR 9$ : 
000000G 12$: MOV REG. ADR ,RO : 2365 | 
000016 MOV 16(RO),4(SP) ; *,TMP.LOCATION 
MOV 4(SP),CSR.WORD ; TMP.LOCATION, « | 
MOV 4(SP),RO ; CSR.WORD,*« 2366 
077557 BIC 877557 ,RO | 
100220 CMP RO, 6-77560 
BNE 13$ 
0000006 CLR ERR. FLAG ; 2369 
BR 14$ - : 2368 
000001 0000006 13$: MOV #1,ERR.FLAG : 2373 
SOB R2,8% ; INDEX2,+ 2361 
14$: MOV ERR. COUNT ,R1 : 2379 
000001 0000006 BIT #1,ERR.FLAG ; 2376 
BNE 15$ 
005612’ JMP 23% 
15$: TST Ri ; 2381 
BNE 16$ 
000001 0000006 MOV #1,ERR. COUNT ; 2383 
MOV @MSG59, -( SP) : 2384 
000001 MOV #1,-CSP) 
MOV RO ; SP,* 
TRAP 
000000G MOV @MSG35, (SP) : 2385 
000001 MOV #1,-CSP) 
MOV ° 0 a SP ,* 
TRAP 14 
000000G MOV @MSG36 , (SP) : 2386 
000001 MOV #1,-C(SP) 
MOV SP,RO ; SP,* 
TRAP 14 
TRAP 55 ; 2387 
WORD 1302 
.WORD MSGOO 
.WORD ERRORSREPORT 
BR 18$ ; 2382 
000001 16$: CMP R1,@1 ; 2389 
BNE 17$ 
000002 000000G MOV #2, ERR. COUNT ; 2391 
000000G MOV @MSG59, -( SP) ; 2392 
000001 MOV #1,-CSP) 
MOV SP ,RO - SP,* 
TRAP 14 
0000006 MOV #MSG37, (SP) ; 2393 
000001 MOV #1,-(SP) 


ww Ee 


- ——_ ee ee a ee 


CZQNADO DEQNA FUNCTIONAL TEST 


TEST 7 - ETHERNET CARRIER SENSE TEST 
MOV 
TRAP 
000000G MOV 
000001 MOV 
MOV 
TRAP 
TRAP 
. WORD 
. WORD 
. WORD 
BR 
000002 17%: CMP 
BNE 
000003 000000G MOV 
000000G MOV 
000001 MOV 
MOV 
TRAP 
000000G MOV 
000001 MOV 
MOV 
TRAP 
000000G MOV 
000001 MOV 
MOV 
TRAP 
TRAP 
. WORD 
. WORD 
. WORD 
000010 18$: = 
000003 193: CMP 
BNE 
000000G CLR 
000000G MOV 
000001 MOV 
MOV 
TRAP 
000000G MOV 
000001 MOV 
MOV 
TRAP 
TRAP 
. WORD 
. WORD 
. WORD 
BR 
000004 208: CMP 
BNE 
00C000G CLR 
000000G MOV 
000001 MOV 


Bil 


14-Mer-19865 13:11:16 
14-Mer-1985 13:05:35 


ERR . COUNT 
#1, -( SP) 


eee ta Ee SR Tne mame ——_ 


EE EE EE EE SE Ge ee eee | 


& 
ee eee 


SEQ 0 
VAX-11 Blies-16 V4.1-582 P age a 
DISK $USER2: : (MARSHALL . DEQNA )ZQNA3. BL1;4 19) 
i SP ,* 
5 2394 
i SP ,* 
5 2395 | 
; 2396 
5 2397 
; 2399 
5 2400 
3 SP, 
5 2401 
3 SP, 
$ 2402 
3 SP ,*« 
5 2403 
$ 2398 
3 2379 
3 2405 
; 2407 
; 2408 
: SP ,* 
3 2409 
3 SP, 
; 2410 
; 2406 
; 2412 
; 2414 

2415 | 


oe ————— es 


- «<n & mee aL eee TT I ES AT SE mm -——_——_— — - eee —— = 


Cil 











; SEQ 0132 | 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 49° 
TEST 7 - ETHERNET CARRIER SENSE TEST 14-Mar-1985 13:05:35 DISK $USER2: [MARSHALL .DEQNAJZQNA3.6L1I1;4 (19) | 
MOV SP ,RO ; SP,*= | 
TRAP 14 
000000G MOV #MSG45 , (SP) | 2416 
000001 MOV #1,-CSP) 
MOV SP ,RO ; SP,+*# 
TRAP 14 
TRAP ss SS ‘ 2417 | 
.WORD 1306 
.WORD MSGOO 
.WORD ERRORSREPORT 
000006 21$: ADD #6, SP $ 2413 
22s: TRAP ; 2419 
BR 28$ ; 2378 
23%: TST Ri $ 2423 
BEQ 29% 
000000G MOV REG.ADR,RO ; 2425 
000016 000006 MOV 16CRO),6(SP) ; *, TMP .LOCATION 
000006 000000G MOV 6(SP),.CSR.WORD ; TMP .LOCATION, + 
000004 000000G MOV 04,ERR. COUNT $ 2431 
MOV @MSG59, -( SP) ; 2432 
000001 MOV #1,-(SP 
MOV SP ,RO ; SP, 
TRAP 14 
000000G MOV @MSG43 , (SP) 3 2433 
000001 MOV #1,-(SP) 
MOV . 3 SP ,* 
TRAP 14 
000000G MOV OMSG44 , (SP) : 2434 
000001 MOV #1,-CSP) 
MOV SP ,RO ; SP ,* 
TRAP 14 
TRAP 55 3 2435 
-WORG 1307 
. WORD 
-WORD $ERRORSREPORT 
000010 ADD #10,SP : 2430 
BR 27 ; 2427 
000002 24$: CMP R1, #2 ; 2437 
BLT 25 
000003 CMP R1,¢3 
BGT 25 
000000G CLR ERR .C : 2439 
000000G MOV @MSG59, -( SP) : 2440 
000001 MOV #1,-(€ 
MOV SP RO 2 SP ,* 
TRAP 14 
000000G MOV @MSG42, (SP) ; 244) 
000001 MOV #1,- 
MOV SP ,RO ; SP, 
TRAP = «14 
TRAP 55 ; 2442 | 
i 


-_— = ———— a ore 


Dil 





| 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 me 50 ! 
TEST 7 - ETHERNET CARRIER SENSE TEST 14-Mar-1985 13:05:35 DISK $USER2: (MARSHALL .DEQNAJZQNA3.6LI;4 (19) 
-WORD 1310 
.WORD MSGOO 
-WORD ERRORSREPORT 
BR 26$ ; 2438 
000004 25$: CMP R1, 04 ' 2444 | 
BNE 27$ 
000000G CLR ERR .CO ; 2446 
000000G MOV #MSG59,-CSP) $ 2447 
000001 MOV #1,-(CSP 
MOV SP, ; SP,* 
TRAP 
0000006 MOV #MSG46 , (SP) ; 2448 
000001 MOV #1,-CSP) 
MOV SP RO ; SP,* 
TRAP 14 
TRAP 55 ; 2449 
-WORD 1311 
.WORD MSG 
-WORD ERRORS$REPORT 
000006 26$: ADD #6, SP ; 2445 
27$: TRAP 63 ; 2451 
007046' 28s: JMP 49$ ; 2425 
000000G 29$: CLR XC .FLAG ; 2455 
000000G CLR ERR . COUNT ; 2456 
30$: TRAP 
CLR Re ; INDEX2 2459 
000000G 31$: JSR PC ,RESET.DEQNA ; 2461 
000000G MOV R2, TEMPS ; INDEX2,+ 2462 
000000G JSR PC ,.SEND. TEST .PACKET : 2470 
CLR Ri ; INDEX 2472 
32$: MOV REG. ADR,RO : 2473 
000016 000010 MOV 16(RO),10(SP) ; *, TMP. LOCATION 
020000 000010 Al aa 10( SP) ; *,TMP.LOCATION 
000010 000012 MOV 10¢SP),12¢CSP) ; *,TMP.LOCATION 2476 
000012 000000G MOV 12(SP), TEMP2 ; TMP .LOCATION, + 
BR 35% : 2475 
000200 33$: CMP Ri, #200 ; INDEX,# 2480 
BNE 34$ 
000000G MOV #MSGS59, -C SP) : 2483 
000001 MOV #1,-CSP) 
MOV SP b RO ; SP »* 
} TRAP 14 
000000G MOV REG. ADR,RO ; 2484 
000016 000020 MOV 16(RO),20(SP) ; *,TMP.LOCATION 
000020 MOV 20( SP), CSP) ; TMP.LOCATION, 
000000G MOV #MSG19,-CSP) 
000002 MOV #2,-CSP) 
MOV SP RO ; SP,* 
TRAP 14 
TRAP SS ; 2485 
. WORD 1275 
-WORD MSGOO 


ee me eee ee 


me ee ee = — — 


es E14 | 
5 





SE 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 _* 
TEST 7 - ETHERNET CARRIER SENSE TEST 14-Mar-1985 13:05:35. DISK $USER2: : (MARSHALL . DEQNA)ZQNA3.BL1;4 613) 

-WORD ERRORS$REPORT 
062706 000010 ADD #10, ‘ 2482 
005201 34$: INC ; INDEX 2472 
020127 900200 CMP R1,#200 ; INDEX,* 
003720 BLE 32$ 
005001 35%: CLR R1 ; INDEX 2494 | 
013700 000000G 36$: MOV REG.ADR,RO | 2495 
016066 000016 000016 MOV 16(RO),16(CSP) ; *,TMP.LOCATION 
032766 020000 000016 BIT #20000, 16(SP) ; *,1MP.LOCATION 
001007 BNE 37$ 
016666 000016 000020 MOV 16(SP),20(SP) ; *,TMP.LOCATION 2498 
016637 000020 000000G MOV 20( SP), TEMPS ; TMP.LOCATION, + 

BR 39$ ; 2497 
020127 002000 37$: CMP R1, #2000 ; INDEX,* 2502 
001031 BNE 38$ 
012746 000000G MOV #MSGS59, -(C SP) ; 2505 
012746 000001 MOV #1,-CSP) 
01 MOV SP ,RO ; SP, 
104414 TRAP 14 
013700 000000G MOV REG. ADR,RO ; 2506 
016066 000016 000026 MOV 16(RO),26(SP) ; *,TMP.LOCATION 
016616 000026 MOV 26( SP), (CSP) ; TMP.LOCATION,*+ 
012746 000000G MOV #MSG20 , -C SP) 
012746 000002 MOV #2,-C(SP) 
010600 MOV »RO ; SP,* 
104414 TRAP 14 
104455 TRAP 55 ; 2507 
001276 . WORD 1276 

. WORD 

-WORD ERRORS$REPORT 
062706 000010 ADD » SP ; 2504 
005201 38$: INC ; INDEX 2494 
020127 002000 CMP R1, #2000 ; INDEX,* 
003720 BLE 36% 
012701 000062 39$: MOV #62 ,.R1i ; *,$$TMP2 2515 
001410 40$: BEQ 43$ 
013700 000000G MOV L$DLY,RO ; *,$$TMPl 
061403 BEQ 2$ 

5066 000032 41$: CLR 32¢ SP) ; $$TMP 

077003 SOB RO,41$ ; $$TMP1,* 
005301 42$: DEC ; $$TMP2 
000767 BR 40$ 
013700 43%: MOV REG.ADR,RO : 2517 
016066 000016 000024 MOV 16CRO),24(SP) ; *, TMP.LOCATION 
100007 BPL 44$§ 
016666 000024 000026 MOV 24(SP),26(SP) ; *, TMP .LOCATION 2520 
016637 000026 000000G MOV 26( SP), TEMP4 ; TMP.LOCATION, = 

BR 4S$ : 2519 
005202 44$: INC R2 ; INDEX2 2459 
020227 000200 CMP R2, #200 ; INDEX2,* 

BGT 45$ 
000137 006116’ JMP 31i$ 
023727 000000G 000200 45$: CMP TEMPS , #200 ; 2525 


ee A Ee oe ae 


CZQNADO DEQNA FUNCTIONAL TEST 


TEST 7 - ETHERNET CARRIER SENSE TEST 


000000G 
000001 


900000G 
000016 000034 


000000G 
037777 000012G 


000000G 
000001 


000000G 
000001 


46$: 


47$: 


Fil 


14-Mar-1985 13:11:16 
14-Mer-1985 13:05:35 


46$ 
#MSGS59,-CSP) 


#1,-¢ P) 
S 


= 

G.AOR,R 
TeCROD. $acsP) 
34(SP),(SP) 


MSGOO 

ERROR $REPORT 

#10,SP 

ol alarmed 
#1000, XMIT.D.LIST+10 
47$ 


P) 
. CHK. CSR. STATUS 
2400. XMIT.O.LIST+10 
$-40000, (SP) 


-CSP) 

PC ,CHK .XMIT.STATUS 
#-40000, CSP) 
#20000, -( SP) 
PC,CHK.RCV.STATUS 
037777, XMIT.DO.LIST+12 


48$ 
#MSGS9, CSP) 
#1,-CSP) 


14 
#MSG58 , CSP) 
#1,-CSP) 

SP ,RO 


SE 
VAX-11 Bliss-16 V4.1-582 ; ia % 
DISK $USER2: [MARSHALL .DEQNAJZQNA3. eLI, : 


% 
; nA 


; SP,* 
; 2529 
; *, TMP .LOCATION 
; TMP .LOCATION, + 
. SP ,* 
; 2530 
$ 2527 
$ 2534 
5 2537 
; SP ,* 
5 2538 
; SP,* 
; 2539 
$ 2536 
: 2546 
8 2547 
$ 2548 
3 2549 
’ 2551 
3 2554 
; SP, 
; 2555 } 
; SP, 
| 
| 


; Routine Size: 
: Meximum steck depth per invocation: 


000000 
000000 
000004 
000006 
000010 
000012 


004737 
104466 


006000 
103773 
000207 


; Routine Size: 


: 2562 
$ 2563 


1 
1 


——— —— A Te it a a 


CZQNADO DEQNA FUNCTIONAL TEST 


TEST 7 - ETHERNET CARRIER SENSE TEST 


006112’ 
000034 


618 words, 


004530’ 


6 words, 
; Maximum stack depth per invocation: 


48%: 


49$: 


Routine Base: 
25 words 


i$: 


ABS$CODE $ 


G11 


14-Mar-1985 13:11:16 
14-Mer-1985 13:05:35 


MSGOO 

ERROR $REPORT 
(SP)+,(SP)+ 
_ 


+ 4530 


A ee — —— —- . 


SEQ 0136 
VAX-11 Bliss-16 V4.1-582 Pp 53 | 


DISK$USER2: (MARSHALL .DEQNAJZQNA3.BL1;4~ (19) 


; 2556 
; 2553 | 
; 2456 
; 2557 
; 2263 


T7 TEST 7 - ETHERNET CARRIER SENSE TEST 


Routine Base: ABSCODE$ + 7054 
2 words 


5 2560 


ee ee eee 


——— nee 


tw 
vi 
@ 
~ 
be ee ee ee ee be ee be be be ee ee be ee ee ee be be ee be he be he be be he ee be be he be ee be be he be be bo 


——e ee 


<—- ee ee 


Hit 


14-Mar-1985 13:11:16 


CZQNADO DEQNA FUNCTIONAL TEST 
14-Mar-1985 13:05:35 


TEST 8 - STATION ADDRESS RAM TEST 
SsSBTTL ‘TEST 8 - STATION ADDRESS RAM TEST’ 


TEST 8: STATION ADDRESS RAM TEST 
DESCRIPTION: 


= te te te te te te 
> 


SEQ 0137 
VAX-11 Bliss-16 V4.1-582 P 


This test verifies that Station Address RAM has no we faults. 


The host writes and then reads date patterns to all o the 
addressable RAM ( 128 decimal bytes ). The date is Seaman to see 
that the date pattern received is the same as the data pattern 
transmited. This test continues until all the data patterns are 
exhausted. If the operator specifies loop on error, the program 


The following BINARY patterns are used: 


11111111 00000000 
10101010 01010101 
11001100 00110011 
11110000 00001111 


marching i's, propagating 1's through the RAM 
marching 0's, propagating 0's through the RAM 


Hardware tested: Station Address RAM 
Q-Bus to QTDC interface 


Portion of Receive and Transmit FIFO 
Processing: 


BEGIN 

reset device 

select Setup mode 

REPEAT for each pattern 
load transmit packet with date pattern 
transmit loopback packet (fill all of the RAM) 
receive packet 
check for expected loopback status 
IF error 
THEN 

ae error message if not inhibited 


call compere_packets 
ENDREPEAT 
END 


CSR register - Receiver Enable (bit 0) 


re-executes the code that detected the error until tC is entered. 


—E ee ee rn 


54 
DISK$USER2: [MARSHALL .DEQNAJZQNA3.BLI;4~ (20) 


EEE SS ES 
a 


ee ae ee 
a eee ae 





HPAL HSAHHSHSHSHSSAAS HS HS HS SUMAN aA & &uwui vu 


004137 000000G 
004737 000000G 


(ee! 


14-Mar-1985 13:11:16 


CZQNADO DEQNA FUNCTIONAL TEST 
14-Mer-1985 12:05:35 


TEST 8 - STATION ADDRESS RAM TEST 
BGNTST; 
RESET_DEQNA ( ); 
DECR INDEX1 FROM 7 TO O DO 
BEGIN 


INCR INDEX2 FROM O TO 127 DO 


XMIT_BUFFER ( .INDEX2 ] = .PTRN_TABLE [( .INDEX1 J; 


BGNSUB ; 
XMIT_SETUP_PACKET ( N_MODE ); 
ENDSUB ; 
END; 


TEMPS = ( N_MODE *« 8 ) - 1; 
INCR INDEX1 FROM 0 TO TEMPS DO 
BEGIN 
Pi = ZERO; 
P2 = .INDEX1; 
WALKING _BIT (€ ); 
Pi = N_ ; 
XMIT_SETUP_PACKET ( ); 


VAX-11 Bliss-16 V4.1-582 


INCR INDEX FROM O TO .P3 DO 
a _BUFFER [ .INDEX ] = ( - .XMIT_BUFFER [ .INDEX ] ) - 1; 
P1 = N_MODE; 
XMIT_SETUP_ PACKET C 23 
END; 
INCR INDEX1 FROM 0 TO N_MODE - 1 DO 


BEGIN 

INCR INDEX FROM 0 TO N_MODE - 1 DO 
XMIT_BUFFER [ .INDEX ] = ZERO; 

XMIT_BUFFER [ .INDEX1 ] = #X'FF'; 


BGNSUB ; 
XMIT_SETUP_PACKET ( N_MODE ); 
ENDSUB ; 


INCR INDEX FROM O TO .P3 DO 


XMIT_BUFFER [ INDEX } = (© - .XMIT_BUFFER [ .INDEX ] ) - 1; 

BGNSUB ; 

XMIT_SETUP_PACKET € N_MODE ); 

ENDSUB ; 

E 
ENDTST; 
.SBTTL $T8 TEST 8 - STATION ADDRESS RAM TEST 
$T8: JSR R1,$SAVE3 : 

JSR PC ,RESET.DEQNA : 


lie 


SEQ 0138 
Page 55 
DISK $USER2 : (MARSHALL .DEQNA)ZQNA3.BL1;4 


(21) 


2561 
2612 


! 
‘ 
RE LT TT TT ST ade 


—aeawewew en ee 


012701 
005000 


s Routine Size: 
+; Maximum steck 


—— — om + 


_- meld  mmuumLi.  i. iit, ae c ae 


CZQNADO 


DEQNA FUNCTIONAL TEST 


TEST 8 - STATION ADDRESS RAM TEST 


000007 


900000G 000000G 
000177 ~ 


000200 
000000G 


177777 

000000G 
000000G 
000000G 


000200 
000000G 


000177 


73 words, 
depth per invocation: 


1$: 
2$: 


3$: 


4$: 
5$: 


6$: 


7$: 


8$: 
9$: 


Routine Base: 
6 words 


J1i 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


a 

ee rn cans ae ee 
RO, #177 

2$ 

2 

#200, -(SP 


) 
PC, XMIT.SETUP.PACKET 
CSP )+ 


aaatlasiltine 
RO, #177 
#377 ,XMIT.BUFFERCRi )D 


2 

#200, -(SP) 

PC, XMIT. SETUP .PACKET 
SP )+ 


XMIT .BUFFER(RO),R3 
R2, XMIT . BUFFERCRO) 
RO,P3 

7$ 


2 
#200, -(SP) 
oe 


AB$CODE$ + 7070 


eee ee ee << LT —_—— 


| 


SEQ 0139 
VAX-11 Bliss-16 V4.1-582 Page 56) 
DISK$USER2: (MARSHALL .DEQNA]ZQNA3.BL1I:4 (21)! 
; INDEX2 2616 
; *CINDEX1), *C INDEX2) 2617 
3 INDEX2 2616 | 
. INDE X2 »* j 
; 2617 
: 2620 
$ 2617 
$ 2620 
; INDEX1 2614 
; INDEX1 2639 
; INDEX 2641 
; *C INDEX) 2642 
; INDEX 2641 
; INDEX »* 
; *,*CINDEX1) 2643 
5 2646 
; 2643 
; 2646 
; INDEX 2649 
5 2650 
; *CINDEX),« 
; *,*C INDEX) 
; INDEX 2649 
3 INDEX, * 
; 2650 
; 2653 
; 2653 
: INDEX1 2639 
; INDEX1 »* 
2561 | 
| 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: 
; Maximum steck depth per invocation: 


004737 
104466 


006000 
103773 
000207 


; 2658 1 


ee Se ee 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 8 - STATION ADDRESS RAM TEST 


007070' 


6 words, 


T8:: 
i$: 


Routine Base: 


2 words 


K11 te Ed 


SEQ 20140 : 
VAX-11 Bliss-16 V4.1-582 57! 


14-Mar-1985 13:11:16 Page 57! 
DISK$USER2: [MARSHALL .DEGNAJZQNA3.BLI;4 (21). 


14-Mar-1985 13:05:35 


.SBTTL 18 TEST & - STATION ADDRESS RAM TEST 


JSR PC,$T8 ; 2656 
TRAP 66 
ROR RO 
BLO 1$ 
RTS PC 


ABSCODE$ + 7312 


—neween see 
—_— ee <n nn see ett CES Ct LLL LLL LLL LLL LLL EL LL 


LLL LLL - 


be te be be ee bee bee be ee bee tee te be be te ee ae bee be fe ae be be eee ee be Be be ee ee ee he ee ee be ee ee ee ee be ee 


Lil 


DEQNA FUNCTIONAL TEST 
sSBTTL ‘TEST 9 - PROMISCUOUS STATION ADDRESS TEST’ 


TEST 9: PROMISCUOUS STATION ADDRESS TEST 


DESCRIPTION: 


This test verifies that DEQNA promiscuous addressing mode functions 
es specified. Bit patterns and aduresses in and out of the ran of 
setup eddresses ere used to assure that there is true promiscuity. 
If the operetor specifies loop on error, the program re-executes the 
code that detected the error until tC is entered. 


Hardwere tested: Promiscuous addressing mode logic 
Set of Target Addresses in HEXADECIMAL: 


00-00-00-00-00-00 

AA-AA-AA-AA-AA-AA 

55-55-55-55-55-55 

FF -FF-FF -FF -FF -FF 

Walking 1, shifting 1 across the Target Station Address 
Walking 0, shifting 0 across the Target Station Address 


Processing: 


BEGIN 
reset device 
select internal loopback mode 
set mode to Setup 
set ‘promiscuous’ addressing mode bit 
REPEAT for each Terget Address 
load Terget Address of the packet 
diseble receiver 
transmit loopback packet 
enable receiver 
check for expected loopback stetus 
IF error 
THEN 


print error message if not inhibited 
ENDIF 
call compere_packets 
ENDREPEAT 
END 


ee Oe me EE Ree ene a  —_— 


——— = —— a _—_— — = ——— 


SEQ 0141 


CZQNADO 14-Mar-1985 13:11:16  VAX-11 Bliss-16 V4.1-582 Page 
TEST 9 - PROMISCUOUS STATION ADDRESS TEST 14-Mar-1985 13:05:35 § DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BLI;4 


LE ELLE LLL LA 


56 | 
(22) 


—_— —— ee 


Mil 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 v4.1-S82 wn my 59 
TEST 9 - PROMISCUOUS STATION ADDRESS TEST 14-Mar-1985 13:05:35  DISK$USER2: (MARSHALL .DEQNAJZQNA3.BL1I;4 (23) 


BGNTST; 


See 


! RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING 
! TESTS IN EXTERNAL LOOPBACK MODE. 


RESET_DEQNA ( ); 

PREP_FOR_SETUP ( ); 

INCR INDEX1 FROM 1 TO 14 DO | 
URT_STATION.ADR ( -INDEX1, PHA_INDEX ); | 


BGNSUB ; 

XMIT_SETUP_PACKET ( P_MODE ); 
ENDSUB; 
tee 


! NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 


RBUF _LENGTH = 6; 
XBUF _LENGTH = - ( .RBUF_LENGTH f -1 ); 


| 
INCR INDEX1 FROM 0 TO 99 DO | 
BEGIN 
SELECTONE .INDEX1 OF 

SET 


{ 0703 }: 
WRT_STATION_ADR ( ZERO, .INDEX1 ); 
{ 417051 ): 


WALKING _BIT ¢ ZERO, . INDEX1 7 4, 5 ); 
{ S52 TO 99 ): 


WALKING _BIT € ONE, .INDEX1 - 52, 5 ); 
TES; 
j 


WRT_STATION_ADR (€ ZERO, ZERO ); 
BGNSUB ; 
XMIT_ILOOP_PACKET (€ ZERO ); 
END 3 
END; 


INCR INDEX FROM O TO 5 DO 
TARGET_ADR { .INDEX ] = ZERO; 
ENDTST; 


HMUAWUUEHaADHHLS SSS SSLDALLAS &PUUTtTininisin#iaws#savyviul vw vu vi vl vl vl wu w 


-SBTTL $T9 rans 9 - PROMISCUOUS STATION ADDRESS TEST ou : 
I 


010146 $79; MOV Ri, -C : 

004737 000000G JSR PC ,,RESET .DEQNA : 2711 | 
004737 000000G JSR PC, PREP .FOR.SETUP : 27l2 
l2 012701 000001 MOV 01,R1 ; *, INDEX] 2713 | 





—~ <<" --— =—- - - — 


— — § dl ama. ee, ei, ae 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 9 - PROMISCUOUS STATION ADDRESS TEST 


1$: 


000023 
000000G 


000016 


000202 
000000G 


000006 
000006 


000000G 


2s: 


3$: 


4$: 


5$: 


6$: 


7$: 


8$: 


Nii 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


R1,-CSP) 


623,-CSP) 
PC ,WRT. STATION. ADR 
CSP )+,(SP)- 


Ri 

R1,016 

1$ 

2 

0202, -( SP) 

PC, XMIT. SETUP .PACKET 
(SP )- 

67 

RO 

2s 

06, RBUF .LENGTH 
#6,RO 


RO 
RO, XBUF ._ENGTH 
R1 


R .” SP ) 
PC ,,WRT.STATION. ADR 
a ta 


#5,- SP) 
PC,WALKING.BIT 
06 , SP 


-(SP) 
-(SP) 
PC.WRT. STATION. ADR 


(SP) 
PC, XMIT.ILOOP.PACKET 


ee —_——-— ee eee - 


SEQ 0143 


VAX-11 Bliss-16 V4.1-582 


P 
DISKSUSER2: [MARSHALL .OEQNA)ZQNA3.8L1;4~ 


° INDEX1,¢ 


s INDEX1 
: INDEX1,¢ 


INDEX1 
INDE X1 
INDEX1,¢* 
INDEX1,¢ 
INDEX1, + 
INDEX1, # 


INDEX1, * 


INDEX1, * 
INDEX1, « 


INDEX1, # 


60 
(23) 
2714 | 


2713, 


2714. 
2717 | 


2735 


2736 


2739 


2742 


; Routine Size: 
; Meximum steck depth per invocetion: 


000000 
000000 
000004 
000006 
000010 
000012 


: Routine Size: 
; Meximum steck depth per invocation: 


02002 

003772 
012601 
000207 


004737 
104466 
006000 
103773 
000207 


3 2750 i 


—_ De ee ae 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 9 - PROMISCUOUS STATION ADDRESS TEST 


100 words, 


007326' 


6 words, 


TRAP 


RTS 


Routine Bese: ABSCODES 
5 words 


Ble 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


67 

RO 

83 

aa »CSP)-« 
R1,0143 

3$ 

RO 
TARGET . ADRCRO) 
RO 


RO, @S 

9$ 

(SP )- Ri 
PC 


+ 7326 


SEQ 0144 
VAX-11 Blies-16 V4.1-582 Page 
DISK $USER2: (MARSHALL .DEQNA )ZQNA3.6L1;4 (23) 


$ 2728 
s INDEX1 2727 
3 INDEX1,*« 

$ s 2747 
; *C INDEX) 2748 
; INDEX 2747 
; INDEX,«¢ 

5 2657 


T9 TEST 9 - PROMISCUOUS STATION ADDRESS TEST 


PC,$T9 
66 


RO 
i$ 
PC 


Routine Base: ABSCODES + 7636 
2 words 


F 2748 


—awerr ew wee 


te ee ee ee be ee ee be ee ee he be ee be he be be be be be be ee ee ee ee ee ee be ee be he be bee he he he he ee ee he bee ee 


Ule 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 
TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST 14-Mar-1985 13:05:35 


SSBTTL ‘TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST' 


fee 


TEST 10: TRANSMIT AND RECEIVE FIFO MEMORY TEST 
DESCRIPTION: 


—s hes no static feults. The host writes and then reads 


entered. 
Hardwere tested: Transmit buffer address log 
Receive FIFO address 


The following BINARY patterns are used: 


11111111 00000000 
10101010 01010101 
11001100 00110011 
11110000 00001111 


Processing: 


BEGIN 
reset device 
select internel/extended loopback mode 
REPEAT for each pettern 


check for expected loopbeck stetus 
IF error 
THEN 
print error message if not inhibited 

ENDIF 
call compere_peckets 

ENDREPEAT 

END 


ee 8 + ere eee ——_—— ee me ee - —_—— —_ 


SEQ 0145 
VAX-11 Bliss-16 V4.1-582 


Page 62°: 
DISK $USER2: [MARSHALL . DEQNA)ZQNA3. BLI; - (24) 


This test verifies that link memory (receive FIFO and transmit 


@® sequence of date patterns to the link memory. The date is then 
checked to see that the date pattern received is the same as the 
date pattern transmitted. This test continues until ell the date 
patterns ere exhausted. If the operator specifies loop on error, the 
progrem re-executes the code that detected the error until fC is 


Transmit buffer pues kan! ¢ First 1512 bytes ) 
Receive FIFO memory ( first 1512 bytes ) 


write link memory with pattern - transmit loopbeck packet 
read link memory with pattern - receive loopback packet 


LLL LLL ELL LLL OIL I os 


—_———-- 
LLL LL AL OS 


eee ee EE EE ee 
mm A kL LLL 


. _ * -_-_——- ~——_—<-« 


Die 


SEQ 0146 | 
_ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 
~V01.0 TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST 14-Mar-1985 13:05:35 DISK#USER2; [MARSHALL .DEGNA)ZQNA3.BLI.2° (20, | 
, 2796 3 BGNTST; 
's 2797 3 

: 2798 3 bee 

; 2799 : LOOPBACK 1514 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 
; = } 
3 2801 3 { 
; 2802 3 RBUF_LENGTH = LONGEST_PACKET; 

; 2008 ; XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); | 
3 ‘ 
; 2805 3 INCR INDEX FROM 0 TO 7 DO 
; 2806 4 BEGIN 

: 2807 4 RESET -DEQNA C ); 

; 2808 4 TEMP1 = 0; 

; 2809 4 INCR INDEX1 FROM 0 TO 189 DO 

; 2810 4 INCR INDEX2 FROM O TO 7 DO 

; 2811 5 BEGIN 

; e812 5 XMIT_BUFFER [ .TEMP1 ] = .PTRN_TABLE [ .INDEX2 ]}; 

; 2813 5 TEMP1 = .TEMP1 «+ 1; 

; 2814 4 END; 

; 2815 4 

3 2816 4 tes 

; 2817 4 ! ROTATE PATTERN TABLE 

; 2818 4 — 

; 2819 4 

; 2820 4 TEMP2 = .PTRN_TABLE [ 0 i: 

; 2821 4 INCR INDEX3 FROM 0 TO 6 00 

; 2822 4 PTRN_TABLE { .INDEX3 ] = .PTRN_TABLE [ .INDEX3 + 1 }; 

; 2623 4 PTRN_TABLE { 7 ] = .TEMP2; 

3 2824 4 

; 2625 6 BGNSUB ; 

; 2826 6 SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 

; 2827 6 SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 

: 2828 6 SEND_ELOOP_PACKET ( ZERO ); 

; 2829 6 COMPARE_PACKETS ( ); 

; 2830 4 ENDSUB ; 

; 2831 4 

; 2832 3 END; 

$ 2833 3 

; 2834 3 ' INCR INDEX1 FROM O TO LONGEST_PACKET - 1 DO 

; 2835 3 ' BEGIN 

; 2836 3 ' INCR INDEX FROM 0 TO LONGEST_PACKET - 1 DO 

; 2837 3 ’ XMIT_BUFFER { .INDEX ] = ZERO; 

; 2838 3 ' XMIT_BUFFER [ .INDEX1 } = sx! FF’; 

; 2839 3 ' | 
; 2840 3 ' BGNSUB ; 

; 2641 3 : SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 

; 2842 3 ' SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 

>; 2843 3 ' SEND_ELOOP_PACKET ( ZERO ); 

: 2844 3 : COMPARE_PACKETS ( ); 

; 2845 3 : ENDSUB ; 

; 2846 3 ' 

: 2847 3 ' INCR INDEX FROM O TO .P3 DO 
>; 2848 3 ' XMIT_BUFFER [ . INDEX ] = ( - .XMIT_BUFFER [ .INDEX ) ) - 1; | 
| 
' 


ii tidied 


Ele 


St 47 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 ca 4 4! 
TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST 14-Mar-1985 13:05:35 DISK $USER2: (MARSHALL . DEQNA)ZQNA3.6L1;4 (28) | 


3 ' 
3 ' BGNSUB ; 
3 : SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
3 ' SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
3 ' SEND_ELOOP_PACKET ( ZERO ); 
3 ' COMPARE _PACKETS ( ); 
3 ' ENDSUB; | 
3 ' 
: ' END; 
1 ENOTST; 
.SBTTL $T10 TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST 
004137 000000G $710: JSR Ri, $SAVE3 ; 2749 
012737 002752 0000006 MOV #2752 ,RBUF .LENGTH ; 2802 
012700 002752 MOV #2752 ,R0 ; 2803 
006200 ASR RO 
005400 NEG RO 
010037 000000G MOV RO, XBUF .LENGTH 
012703 000010 MOV #10,R3 ; *, INDEX 2805 
004737 000000G 1$: JSR PC ,RESET.DEQNA ; 2807 
005037 000000G CLR TEMP1 ; 2808 
012702 000276 MOV #276 ,R2 ; *, INDEX1 2809 
005000 2$: CLR RO ; INDEX2 2810 
013701 000000G 3$: MOV TEMP1,R1 ; 2812 
116061 000000G 000000G MOVB PTRN. TABLEC(RO),XMIT.BUFFER(R1) ; #C(INDEX2),+« 
005237 000000G INC TEMP 1 ; 2813 
005200 INC ; INDEX2 2810 
020027 000007 CMP RO, 07 ; INDEX2,« 
003765 BLE 3$ 
077215 soB R2,2$ ; INDEX1,<« 2809 
005037 000000G CLR TEMP2 ; 2820 
113737 000000G 000000G MOVB PTRN. TABLE, TEMP2 
005000 CLR RO ; INDEX3 2821 
116060 000001G 000000G 4$: MOVB PTRN. TABLE+1(RO),PTRN.TABLEC(RO) ; #( INDEX3), *( INDEX3) 2822 
005200 INC RO ; INDEX3 2821 
020027 000006 CMP RO, #6 ; INDEX3,« 
003771 BLE 4$ 
113737 000000G 000007G MOVE TEMP2 ,PTRN. TABLE+7 ; 2823 
104402 S$: TRAP 2 
013746 000000G MOV XBUF .LENGTH, -( SP) ; 2826 
012746 120000 MOV #-60000, -(SP) 
004737 000000G JSR PC, SET.RDESCR.LIST 
013716 000000G MOV XBUF . LENGTH, (SP) : 2827 
012746 120000 MOV #-60000, -(SP) 
004737 000000G JSR PC,SET.XDESCR.LIST 
005016 CLR (SP) ; 2828 
004737 000000G JSR PC,SEND.ELOOP.PACKET 
004737 000000G JSR PC, COMPARE .PACKETS : 2629 
062706 000006 ADD #6, SP ; 2823 
104467 TRAP 67 ; 2829 





006000 ROR RO 
| 


| ZQNA3 
vo1.0 


000214 103751 
000216 077373 
000220 000207 


; Routine Size: 
; Meximum steck depth per invocation: 


900000 
000000 
000004 
000006 
000010 
000012 


s Routine Size: 


004737 
104466 


006000 
103773 
000207 


. -- we er ee ee ee 


CZQNADO DEQNA FUNCTIONAL 
TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST 14-Mar-1985 13:05:35 


73 words, 


007652’ 


6 words, 


; Meximum stack depth per 


3 2860 1 


a ee ee 


Fie 


SE 4 
14-Mar-1985 13:11:16 — 


VAX-11 Bliss-16 V4.1-582 Page 65! 
DISK$USER2: [MARSHALL .DEQNAJZQNA3.BLI;4~ (25) 


TEST 


sos as i$ INDE 
P ‘ X,* 2805 
RTS PC ; 2749 
Routine Base: ABSCODE$ + 7652 ! 
8 words | 
i 
-_ .SBTTL T10 TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST 
a PC, $T10 , 2832 
TRAP 66 
ROR RO 
BLO i$ 
RTS PC 
Routine Base: ABSCODE$ + 10074 
invocation: 2 words 


— = = ee ee = ee 


——~_ =-— —— — 


Gle 


! 
| 
| ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 "hoe « 66 ° 
,V01.0 TEST 11 - PACKET LENGTH TEST 14-Mer-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BL1;4 (26) 

: 2861 1 *SBTTL ‘TEST 11 - PACKET LENGTH TEST’ 

; 2862 1 tee 

; 2863 1 : 

; 2864 1 - TEST ale PACKET LENGTH TEST 

; 2865 1 : 

: 2866 1 ! DESCRIPTION: 

; 2867 1 : 

; 2868 1 : This test verifies that DEQNA can transmit and receive variable 

; 2869 1 : length packets ( equal to or greater than 60 bytes and equal to or 

$ 2870 1 : less than 1514 bytes without the CRC ) without losing any date 

i 2871 1 : in the process. This test also verifies that the 9th bit of the 

: 2872 1 : FIFO memory is not static (stuck at 1l/stuck at 0). If the operator 

; 2873 1 : specifies loop on error, the progrem re-executes the code that 

; pod : detected the error until tC is entered. 

’ 

: 2876 1 : Hardware tested: Transmit and Receive RAM 

; 2877 1 : 

; 2878 1 : Processing: 

: 2879 1 : 

; 2680 1 : BEGIN 

: 2881 i : reset device 

: 2862 1 : select internal/extended loopback mode 

;s 2683 1 ? —< down_count to max. packet length 

; 2884 1 : up_count to min. packet length 

s 2685 1 : REPEAT “until down count = min. packet length 

$ 2886 i : transmit loopback packet (packet length = down_count) 

5s aaa i : check for expected loopbeck stetus and packet length 

; 2888 1 : IF error 

5 2889 1 : THEN 

; 2890 1 : print error message if not inhibited 

; 2891 1 ; ENDIF 

: 2892 1 ; call compere_packets 

; 2893 1 : transmit loopback packet (pecket len =h = up_count) 

; 2894 1 ; check for expected loopback stetus and packet length 

$ 2895 1 : IF error 

; 2896 1 ! THEN 

; 2897 1 : print error message if not inhibited 

: 2898 1 : IF 

; 2899 1 : cell compere_packets 

; 2900 1 : decrement down_count by 2 

; 2901 1 , increment up_count by 2 

: 2902 1 : ENDREPEAT 

; 2903 1 : ND 

; 2904 1 ! 


<N 





—_——— .- — 
. 






eee ee 


Hie | 


SEQ 0150 


3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 age 67! 
0 TEST 11 - PACKET LENGTH TEST 14-Mar-1985 13:05:35 DISK$USER2: [MARSHALL .DEQNA)ZQNA3.8L1;4 (27)! 
| 
2905 3 BGNTST; 
2906 3 
2907 3 bes | 
2908 3 * LOOPBACK PACKETS OF INCREASING AND DECREASING LENGTH THEN CHECK IF PROPERLY 
2909 3 ! RECEIVED | 
2910 3 $-- 
2911 3 | 
2912 3 COUNTER = ZERO; 
2913 3 UP_COUNTER = SHORTEST _PACKET; 
2914 3 DOWN_COUNTER = LONGEST_PACKET; | 
2916 3 INCR INDEX1 FROM SHORTEST_PACKET TO MAX_LENGTH BY STEP1 DO 
2917 4 BEGIN 
2918 4 RESET_DEQNA ( ); 
2919 4 IF .COUNTER EQLU ZERO 
2920 4 THEN 
2921 5 BEGIN 
2922 5 RBUF_LENGTH = .UP_COUNTER; 
2923 5 XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 
2924 5 INCR INDEX FROM 0 TO .UP_COUNTER - 1 DO 
2925 5 XMIT_BUFFER [ .INDEX ) = #B'01010101'; 
2926 5 INCR INDEX FROM .UP_COUNTER TO MAX_LENGTH - 1 DO 
2927 5 XMIT_BUFFER [ .INDEX ] = ZERO; 
2928 5 UP_COUNTER = .UP_COUNTER + STEP1; 
2929 5 COUNTER = ONE; 
2930 5 END 
2931 4 ELSE 
2932 5 BEGIN 
2933 5 RBUF_LENGTH = .DOWN_COUNTER; 
2934 5 XBUF_LENGTH = - ( .RBUF "LENGTH % «§ ds 
2935 5 INCR INDEX FROM 0 TO .DOWN_COUNTER - 1 DO 
2936 5 XMIT_BUFFER [ .INDEX } = #B'10101010' ; 
2937 5 INCR INDEX FROM .DOWN_COUNTER TO MAX “LENGTH - 1 00 
2938 5 XMIT_BUFFER [ .INDEX ] = ZERO; 
2939 5 DOWN COUNTER = .DOWN_COUNTER - STEP; 
2940 5 COUNTER = ZERO; 
2941 4 END; 
2942 4 
2943 6 BGNSUB ; 
2944 6 SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
2945 6 SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
2946 6 SEND_ELOOP_PACKET ( ZERO ); 
2947 6 COMPARE _PACKETS ( ); 
2948 4 ENDSUB; 
2949 4 
2950 3 END; 
2951 1 ENDTST; 
.SBTTL $T11 TEST 11 - PACKET LENGTH TEST 
004137 000000G $T11: JSR R1, $SAVE2 : 2859 
005037 0000006 CLR COUNTER ; 2912 
10 012737 000074 000000G MOV #74 ,UP.COUNTER : 2913 


012737 


— ee sme alll me ee eee 


CZQ@NADO DEQNA FUNCTIONAL TEST 
TEST 11 - PACKET LENGTH TEST 


002752 000000G 


000074 


i$: 


2$: 
3$: 


4$: 
5$: 


6$: 


7$: 
8$: 


9$: 
10$: 


11$: 


1i2$: 


ile 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


$2752 ,DOWN. COUNTER 
074 ,R2 

PC ,RESET .DEQNA 
—_ 

UP . COUNTER ,RO 

RO, RBUF .LENGTH 

Ri 

3% 
oe 
R1,RO 

2s 

RO 

S$ 

a 
RO, #2775 

4$ 


#2, UP . COUNTER 
#1, COUNTER 


11% 
DOWN. COUNTER , RO 
- (aetna 


8$ 
a 
R1,RO 

7$ 

RO 

10% 

hc tinal 
oo 

#2 ,D0WN. COUNTER 
COUNTER 
ee 


RO 
- grbee ap ae ascent 


XBUF .LENGTH, -(SP) 
#-60000, -(SP) 
PC,SET.RDESCR.LIST 
XBUF . LENGTH, (SP) 
#-60000, - (SP) 
a. .XDESCR LIST 


C 

PC, SEND .ELOOP .PACKET 
PC, —_— PACKETS 
#6 ,SP 


VAX-11 Bliss-16 V4.1-582 


SEQ 0151 


' 
! 
' 
i 


Page 
DISK $USER2: [MARSHALL . DEQNA)ZQNA3.BL1;4 s*¢27) | 


+, INDEX1 


; INDEX 

; *,*C INDEX) 
INDEX 

rs INDEX, * 


; *C INDEX) 
INDEX 
3 INDEX, # 


; INDEX 

; *,*C INDEX) 
INDEX 

a INDEX, * 


*( INDEX) 
INDEX 
; INDEX,= 


2941 


ee 


+ Routine Size: 


— LL A A. LL. i. ae i tlt. ail. 


Jl1le2 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 11 - PACKET LENGTH TEST 


TRAP 67 

ROR RO 

BLO 12$ 
000002 ADD #2,R2 
002776 CMP R2,%2776 

BLE 1$ 

RTS PC 


104 words, Routine Base: ABSCODE$ + 10110 


; Maximum steck depth per invocation: 7 words 


000000 
000000 
000004 
000006 
000010 
000012 


3 Routine Size: 


004737 
104466 
006000 


103773 
000207 


-SBTTL Til TEST 11 - PACKET LENGTH TEST 


010110’ Til:: 
i$: JSR PC,$Til 
TRAP 66 
ROR RO 
BLO i$ 
RTS PC 
6 words, Routine Base: ABSCODE$ + 10430 


+ Meximum stack depth per invocation: 2 words 


s ae & 


VAX-11 Bliss-16 V4.1-582 


SEQ 0152 


| 
: 


Page 
DISK$USER2: [MARSHALL .DEQNA)ZQNA3.B8L1;4 ao 027) | 


; *, INDEX1 
; INDEX1,* 


2947 


2916 


2859 


————— 
il 


_ -————— ae + ee 


st ca cc ce cee cl ee ll eo oe el ol od ed ood eh ed od ed od ode ed ed ee ee ee ee eee 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 12 - NXM INTERRUPT TEST 


SSBTTL ‘TEST 12 - NXM INTERRUPT TEST’ 


See 


DESCR LIST ADR BUFFER ADR 


omeo——-—_— —_—— 


— — ——_ .@ re ee 


K1ie2 


TEST le: NXM INTERRUPT TEST 
DESCRIPTION: 


This test verifies that Transmit and Receive List Invalid bits 

(CSR bits 4 and 5) can be set and reset as specified and that both, 
Transmit and Receive Descriptor List addresses in the I/0 page have 
to be valid to succesfully loopback a packet. 


After eae software reset Transmit and Receive List Invalid bits are 
checked for their initial condition state (both set). Then these bits 
are cleared by writing Transmit and Receive Descriptor List addresses 
into Transmit and Receive Buffer Descriptor Registers. 


First, valid loopback packet is sent to verify that VUT properly 
transmits and receives loopback packets. Then, a Non-Existent 
Memory Access ( NI ) bit is forced to " 1 " each time an invalid 
loopback packet is sent. 


If the operator specifies loop on error, the program re-executes the 
code that detected the error until tC is entered. 


Q-Bus to QTDC interface 

- Valid and invalid host memory 
address processing 

- NXM access (bit 2) 

- Interrupt Enable (bit 6) 


Hardware tested: 


CSR register 


XMIT List Invalid (bit 4) 
RCV List Invalid (bit 5) 


Use following Descriptor List and buffer addresses: 


TRANSMIT RECEIVE 
ekkeeees *eeeees 


DESCR LIST ADR BUFFER ADR 


VALID VALIO VALIO 
INVALID DON’T CARE DON'T CARE DON'T CARE 
VALID INVALID DON'T CARE DON'T CARE 
VALID VALID INVALID DON'* CARE 
VALID VALIO VALIO INVALID 


—— = ——_— = —— oe 


SEQ 4g 


14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 
14-Mar-1985 13:05:35 DISK $USER2: TMARSHALL. DEQNA )ZQNA3. BLI;4” 


79 ° 
(28) 


Bae Be be be be be be be ee be bee bee be be ee be ee be ee ee bee fee fee bee bee ee ee ee ee ee ee bee 


| ee —— — —e_ 


Lie | 


SEQ 0154 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Peas 71 
TEST 12 - NXM INTERRUPT TEST 14-Mar-1985 13:05:35 DISK $SUSER2: (MARSHALL .DEQNA)ZQNA3.BLI;4 (29). 


p i 
rocessing: | 
! 


BEGIN 
reset device ( disables device interrupt ) 
select internal loopback 
read CSR 
— end RCV List Invalid bits not = 1 


tate error message if not inhibited 


enable device interrupt (set CSR bit 6) 
transmit valid loopback packet 
check for expected loopback status 


call compere_packets 
REPEAT for each set of addresses in the set 
transmit invelid loopbeck packet 
IF NXM interrupt didn't occured 
THEN 
oo error message if not inhibited 


check for expected loopback status 

IF error 

THEN 

peewr error message if not inhibited 


END 
ENDREPEAT 
END 


i 
| 
| 
Z error 
print error message if not inhibited 
ENDIF 


er 


WANA UMUAAAADOUUUUU UU WU ol Ul Ul Ot Ut Ot Ot 6 UU Ut 6 Ut Gt Gt Gt Ut 8 Ot a 


-— a —————— ewe 


Mie 


CZGNADO DEQNA FUNCTIONAL TEST 
TEST 12 - NXM INTERRUPT TEST 


BGNTST; 


tee 


! RESET DEQNA AND SELECT LOOPBACK MODE 


RESET_DEQNA ( ); 


PREP_FOR_SETUP ( ); 
INCR INDEX FROM 1 TO 14 DO 
WRT_STATION_ADR ( .INDEX, PHA_INDEX ); 


BGNSUB ; 
XMIT_SETUP_PACKET ( N_MODE ); 
ENDSUB ; 


RBUF _LENGTH = 6; 
XBUF_LENGTH = - ( .RBUF_LENGTH ¢ -1 ); 


CLR_BUFFERS ( B_SIZE ); 
ERR_NUMBER = ZERO; 


See 


! LOOPBACK A PACKET, VALID DESCRIPTORS AND BUFFER ADDRESSES, THEN CHECK IF 
! LOOPBACK PACKET WAS PROPERLY RECEIVED AND NI BIT IN CSR = O 


RESET_DEQNA ( ); 
WRT_STATION_ADR ( ZERO, PHA_INDEX ); 


BGNSUB ; 
XMIT_ILOOP_PACKET ( ZERO ); 
IF GET_BIT € CSR, NI ) 
THEN 


BEGIN 


CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSGS9 ); 
PRINTB ( MSG29 ); 
PRINTB ( MSG28 ); 
‘ ERRDF ( 1201, MSGOO, ERRORSREPORT ); 
: 
ENDSUB ; 


' TRY TO LOOPBACK A PACKET WITH INVALID TRANSMIT DESCRIPTOR ADDRESS, 
' THEN CHECK FOR NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET TO 1 


BGNSUB 


i 
-IOP_TABLE ( XLO_ADR ] = NXM_LO_ADR; 
-IOP_TABLE [ XHI_ADR ] = NXM_HI_ADR; 
IF NOT GET_BIT (CSR, NI ) 


14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 age 
14-Mer-1985 13:05:35 DISK $USER2 : (MARSHALL . DEGNA)ZQNA3.BL1;4 


SEQ@ 0155 
P 


72 
(30) 


———_— —————_- ee 
—_— <«-—- ——— meee eee eae —<- —_——- - = 


Nie 


' ZQNA3 CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-5862 _ a ? 73 
, v01.0 TEST 12 - NXM INTERRUPT TEST 14-Mer-1985 13:05:35 DISKSUSER2: (HARSHALL. DEQNA )ZQNA3.6L1;4 C30) | 
ly 3088 5 THEN 
; 3089 5 IF € .XMIT_DO_LIST [ FLGWD ] AND XFLG_MASK ) NEQU XFLG_MASK 
5 3090 5 THEN 
; 3091 6 BEGIN 
; 3092 6 CSR_WORD = GET_BIT ( CSR_ALL ); 
$ 3093 6 PRINTB ( MSGS9 ); 
; 3094 6 PRINTB ( MSG29 ); 
5 3095 6 PRINTB (€ MSG27 ); 
r 3096 6 ERRDF ( 1202, MSGO0, ERRORSREPORT ); 
' 3097 5 ; 
; 3098 3 ENDSUB; 
; 3099 3 
, 3100 3 tes 
i 3101 3 ! TRY TO LOOPBACK A PACKET WITH INVALID RECEIVE DESCRIPTOR ADDRESS, 
; Lege : ; THEN CHECK IF NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET TO 1 
} oo 
$ 3104 3 
i 3105 5 BGNSUB ; 
' 3106 5 RESET_DEQNA ( ); 
; od : WRT_STATION_ADR ( ZERO, PHA_INDEX ); 
' 
; 3109 5 .IOP_TABLE [ RLO_ADR ] = NXM_LO_ADR; 
; ares : .IOP_TABLE [ RHI_ADR ) = NXM_HI_ADR; 
; 
' 31ii2 5 SET_XDESCR_LIST € .XBUF_LENGTH, VE ); 
; 3113 5 .IOP_TABLE ( XLO_ ADR ) = XMIT_O_LIST; 
; at : .IOP_TABLE { XHI_ADR } = ZERO; 
' 
; Ets : CHK_RIXI_STATUS (€ ONE ); 
; 
' 3118 5 CHK_CSR_STATUS ( #0'000220', #0'000220' ); 
; oko ; CHK_XMIT_STATUS (€ XFLG_ STATUS, XWD12_STATUS ); § 0'140000' , 0'000400' 
; 
' 3i21 5 .I0P_TABLE ({ CSR ] = EENABLE; 
; 3i2z2 5 
; 3123 5 DELAY (€ 20 ); 
' 3124 5 IF NOT GET_ BIT € CSR, NI ) 
: Size 2S THEN 
' 3126 5 IF ( .RCV_O_LIST ({ FLGWD ) AND RFLG_MASK ) NEQU RFLG_MASK 
; 3127 5 THEN 
; 3128 6 EGIN 
; 3129 6 .IOP_TABLE { CSR ] = DISABLE; 
’ 3130 6 CSR_ WORD = GET_BIT ( CSR_ ALL ); 
' 3131 6 PRINTB ( MSGS9 ); 
' 3132 6 PRINTB (€ MSG29 ); 
’ 3133 6 PRINTB ( MSG27 ); 
; 3134 6 ERRDF ( 1203, MSG00, ERROR$REPORT ); 
: Jiao «6US END; 
’ 3136 65 .IO0P_TABLE [ CSR ) = DISABLE; 
’ Saar CUS ENDSUB; 
' 3138 3 
i 3139 3 tee 
; 3140 3 ' TRY TO LOOPBACK A PACKET WITH INVALID TRANSMIT BUFFER ADDRESS, 
| 
' 
| 


iv) 
= 
oa 
NN 
ET OT Td dG UT OD UU Ut Ut Ut ot 


ee ce 


B13 


CZQNADO DEQGNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-562 


ee em ee —_— 


SEQ ao 5 


TEST 12 - NXM INTERRUPT TEST 14-Mer-1985 13:05:35 DISK $USER2: [MARSHALL . DEQNA)ZQNA3. eut,s"" (30) 


THEN CHECK IF NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET 10 1 


XMIT_O_LIST [ LOADR ] = NXM_LO_ADR; 
.I0P_ E { XLO_ADR } = weet -0 “LIST; 
.I0P_ E { XHI_ADR } = 

DELAY 


€ 20 ); 
IF NOT GET_BIT ( CSR, NI ) 
a -XMIT_D_LIST [ FLGWD ] AND XFLG_MASK ) NEQU XFLG_MASK 


BEGIN 
Se ith SE lll caaaataaae ); 
PRINTB ( 9); 


1204, MSGOO, ERRORSREPORT ); 
ENDSUB ; 


* TRY TO LOOPBACK A PACKCT WITH INVALID RECEIVE BUFFER ADDRESS, 
' THEN CHECK IF NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET TO 1 


BGNSUB ; 
RESET_DEQNA ( ); 
SET_RDESCR_LIST ¢ 
RCV_D_LIST ({ LOADR 
.IOP_TABLE [ RLO_ADR 
-I0P_TABLE ( RHI_ADR 


ZERO 
SET_XDESCR_LIST (€ .XBUF_LENGTH, VE ); 
.IOP_TABLE [ XLO_ADR ) = XMIT _D LIST; 
.IOP_TABLE { XHI_ADR } = ZERO; 
CHK_RIXI_STATUS (€ ONE ); 


CHK_CSR_STATUS ( #0'000220', #0'000220' ); 


.XBUF_LENGTH, VENXM ); 
J ; a _ADR; 
J 


CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS ); ! 0'140000' , 0'000400' 
.IOP_TABLE { CSR } = EENABLE; 
DELAY ( 20 ); 


+ GET BIT ( CSR, NI ) 
at -RCV_D_LIST { FLGWD ] AND RFLG_MASK ) NEQU RFLG_MASK 
N 


BEGIN 


eee ee eee 


14-Mar-1985 13:11:16 
14-Mer-1985 13:05:35 


SEQ 0158 
VAX-11 Bliss-16 V4.1-582 


DEQNA FUNCTIONAL TEST Page 75! 
DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BL1:4 (30) | 


CZQNADO 
TEST 12 - NXM INTERRUPT TEST 





6 CSR_WORD = GET_BIT (€ CSR_ALL ); 
6 .IOP_TABLE ({ CSR ) = DISABLE; 
6 PRINTB ( MSGS9 ); 
6 PRINTB (€ MSG29 ); 
6 PRINTB (€ MSG27 ); 
: —_—" € 1205, MSGOO, ERROR$REPORT ); 
‘ 
5 -IOP_TABLE { CSR ] = DISABLE; 
. ENDSUB ; 
1 ENDTST; 
.SBTTL $Ti2 TEST 12 - NXM INTERRUPT TEST 
010146 $Tl2: MOV R1,-CSP) ; 2951 
162706 000026 SUB #26 ,SP 
004737 000000G JSR PC ,RESET.DEQNA ; 3041 
004737 000000G JSR PC ,PREP .FOR.SETUP 5 3043 
012701 000001 MOV #1,R1 ; *, INDEX 3044 
010146 i$: MOV R1,-CSP) ; INDEX,+* 3045 
012746 000023 MOV #23,-CSP) 
004737 JSR PC,WRT.STATION. ADR 
022626 CMP CSP)+,CSP)- 
005201 INC Ri ; INDEX 3044 
020127 000016 CMP R1,#16 ; INDEX,* 
003766 BLE 
104402 2$: TRAP 2 $ 3045 
012746 000200 MOV #200, -CSP) 3 3048 
004737 JSR PC, T. SETUP .PACKET 
005726 TST CSP )- : 3045 
104467 TRAP 67 : 3048 
006000 ROR RO 
103767 BLO 2$ 
012737 000006 000000G MOV #6 ,RBUF .LENGTH : 3051 
012700 000006 MOV 06, 3 3052 
ASR RO 
NEG RO 
010037 000000G MOV RO, XBUF .LENGTH 
012746 004000 MOV #4000, -( SP) 8 3054 
004737 000000G JSR PC,.CLR. BUFFERS 
005037 000000G CLR ERR . NUMBER 3 3055 
004737 000000G JSR PC ,RESET .DEQNA 3 3062 
005016 CLR CSP) ; 3063 
012746 0900023 MOV #23,-CSP 
004737 JSR PC,WRT. STATION. ADR 
104402 3$: TRAP e 
005016 CLR (SP) 3 3066 
004737 000000G JSR PC, XMIT.ILOOP .PACKET 
013700 000000G MOV REG. ADR ,RO 3 3067 
016066 000016 000004 MOV 16(RO),4(CSP) ; *, TMP .LOCATION 
031766 BIT CPC),4¢CSP) ; *, TP. LOCATION 
001436 BEQ 4$ 
016666 000004 000006 MOV 4(SP),6(SP) ; *, TMP.LOCATION 3070 


‘ 
OS ee ee 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 12 - NXM INTERRUPT TEST 


000006 0000006 
000000G 


000001 


000000G 
000001 


000000G 
000001 


000000G 
000001 


6$: 


D13 


14-Mar-1985 13:11:16 
14-Mer-1985 13:05:35 


6(SP),CSR.WORD 


14 
@MSG29, (SP) 
#1,-CSP) 

SP ,RO 


14 
ae: ae 


55 
2261 


MSGOO 
o_o 


2 

PC ,RESET.DEQNA 
#-20000, @IOP . TABLE+10 
oa 


REG.ADR, 
16(RO),10(SP) 
#4,10CSP) 


és 
XMIT.D.LIST,R1 
#37777,R1 
a. 


10¢€SP),12(SP) 
12¢SP),CSR.WORD 
@MSGS59, CSP) 

#1, -(SP) 

SP,RO 


14 
#MSG29, CSP) 
#1,-(CSP) 


14 

55 

2262 

MSGOO 
——_-- 


VAX-11 Blies-16 V4.1-5862 Page 
DISK $USER2 : [MARSHALL . DEQNAJZQNA3.8L1;4 


i TMP .LOCATION, + 


i 
; SP, 
; 

; SP,* 


; *, 1MP.LOCATION 


; SP,* 


SEQ 0159 
76 | 
(30) | 


*, TMP .LOCATION 
*, TMP .LOCATION 


3071 


owe eee - 





CZQNADO DEQNA FUNCTIONAL TEST 
TEST 12 - NXM INTERRUPT TEST 


78: 


000010G 


000016G 
8$: 


000040 9$: 
10$: 


11$: 
000024 
000024 


000026 
000000G 


000000G 
000001 


000000G 
000001 


E13 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


RO 
S$ 


2 
PC ,RESET .DEQNA 
CSP) 


023,-(CSP) 
PC,WRT. STATION. ADR 
#-20000 , @I0P . TABLE +4 


SCR.LIST 
@XMIT.D.LIST,@10P . TABLE+10 
@IOP . TABLE+12 


#1,CSP) 
PC CHK .RIXI.STATUS 


REG . ADR ,RO 
16(RO), 24( SP) 
»24(SP) 


12% 
RCV.D.LIST,R1 
#37777 ,R1 

Ri, @-40000 


12¢ 
@IOP . TABLE+16 
24(SP),26(SP) 
26( SR .WORD 


14 
#MSG27 , (SP) 
#1,-CSP) 

SP ,RO 


VAX-11 Bliss-16 V4.1-582 
DISK $USER2: : (MARSHALL . DEQNA )ZQNA3. aI, a (30) 


*,$$TMP2 
*,$$TMP1 


$$TMP 
$$TMPi,« 
$$TMP2 


*, TMP .LOCATION 
*, TMP .LOCATION 


*, TMP .LOCATION 
TMP .LOCATION, * 
SP ,* 


SP,* 


SP ,* 


| 
51 


3098 
3106 
3107 | 


3109 
3110 | 
3112 


3113 
3114 
3116 
3118 
3119 


3121 
3123 


3124 
3126 


3129 
3130 


3131 
3132 


3133 





- ow 


ee A ee ee ee ae 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 12 - NXM INTERRUPT TEST 


000004G 
000010G 


000022 


000024 


12$: 


13$: 


14$: 


15%: 
168: 
178: 


F135 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


SS 

2263 

MSGOO 

ERROR $REPORT 
06 , SP 
@IOP . TABLE +16 
#10,SP 

67 

RO 

7$ 

2 

PC ,RESET .DEQNA 


XBUF .LENGTH, (SP) 
@-57701,-CSP) 


@-20000, XMIT.D.LIST+4 


#XMIT.D.LIST,@IOP. TABLE +10 
@IOP . TABLE+12 


14$ 

REG. ADR ,RO 
16(RO),22(SP) 
04 ,22(SP ) 

18% 
XMIT.O.LIST,R1 
€37777,R1 
R1,¢@- 


18% 
22(SP),24(SP ) 


MSGOO 
ERROR $REPORT 


VAX-11 Bliss-16 V4.1-582 
DISK SUSER2: (MARSHALL .DEQNA)ZQNA3.B8L1;4 


*,$$TMP2 
+, $$TMPi 
$$TMP 


$$TMP1,* 
$$TMP2 


*, TMP .LOCATION 
*, TMP .LOCATION 


*, TMP .LOCATION 
TMP .LOCATION, « 


SP ,* 


SP ,* 


eR ——_— — .- _ 


SEQ 0161 
Page 


78 
(30) | 


3134 


3151 
3153 


3156 
3157 


3158 
3159 


3160 


————, — oo - 


Oe er ee: 





CZQNADO 
TEST 12 
000006 


000010G 


000016G 


000034 
000034 


000036 


DEQNA FUNCTIONAL TEST 
- NXM INTERRUPT TEST 


18$: 


19$: 


20%: 


21$: 
22$: 
23%: 


Gis 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


RO 
13$ 
2 


PC ,RESET .DEQNA 

XBUF .LENGTH, (SP) 
#-57701,-CSP) 
PC,SET.RDESCR.LIST 
#-20000 ,RCV.D.LIST+4 
@RCV.D.LIST,@IOP. TABLE +4 
@IOP . TABLE +6 

XBUF .LENGTH, (SP > 
#-60000, - (SP) 
PC,SET.XDESCR.LIST 
@XMIT.O.LIST,@I0P. TABLE +10 
@I0P .TABLE+12 


#1,(SP) 
PC,CHK .RIXI.STATUS 
#220, (SP) 


1, @10P . TABLE +16 


. ADR ,RO 
16( RO), 34(SP) 
04, 34(SP ) 

243 
RCV.D.LIST,R1 
#37777 Ri 

Ri, #-40000 


243 
34( SP), 36( SP) 
36( SP . WORD 


em ee ee | ——_— 


SEQ 0162 
VAX-11 Bliss-16 V4.1-582 Page 
DISK$USER2: [MARSHALL . DEQNA)ZQNA3.6L1;4 (30) | 
; 3155 
; 3137 
; 3161 
’ 3162 
; 3170 
; 3172 
; 7 
; 3174 
5 3175 
; 3177 
; 3178 
; 3179 
; 3181 
3 3183 
$ 3184 
; 3186 
; *,$$TMP2 3188 
; *,$$TMPi 
; $$TMP 
; $$TMP1,« 
; $$TMP2 
: 3189 
; *,TMP.LOCATION 
; *, TMP .LOCATION 
3 31391 
; *, TMP.LOCATION 3194 
; TMP .LOCATION, * 
; 3195 
; 3196 
: SP ,* 
; 3197 ) 
; SP, 


ee ere 


H13 


| 
| SEQ 0163 | 
Pose 80 


' ZQNA3Z CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 
vo1.0 TEST 12 - NXM INTERRUPT TEST 14-Mer-1985 13:05:35 DISK$USER2: : (MARSHALL . DEQNA J)ZQNA3. BL1;4° (30) 
001540 104414 TRAP 14 
001542 012716 000000G MOV #MSG27 , (SP) ; 3198 
001546 012746 000001 MOV #1,-(CSP) 
001552 010600 MOV SP ,RO ; SP, 
001554 104414 TRAP 14 
001556 104455 TRAP 55 ; 3199 ! 
001560 002265 .WORDB 2265 
001562 000000G .WORD MSGOO 
001564 000000G .WORD ERRORSREPORT 
001566 062706 000006 ADD #6 ,SP ; 3193 
001572 005077 000016G 243: CLR @IOP . TABLE +16 ; 3201 
001576 062706 9000010 ADD #10,SP : 3162 
001602 104467 TRAP 67 ; 3201 
001604 006000 ROR RO 
001606 103620 BLO 19$ 
001610 062706 000032 AOD #32 ,SP ‘ 2951 
001614 012601 MOV CSP)+,R1 
001616 000207 RTS PC 
; Routine Size: 456 words, Routine Base: ABSCODE$ + 10444 
; Maximum stack depth per invocation: 23 words 

-SBTTL Ti2 TEST 12 - NXM INTERRUPT TEST 
000000 004737 010444' Ti2:: 
000000 i$: JSR PC,$Tie2 ; 3202 
000004 104466 TRAP 6 
000006 006000 ROR RO 
000010 103773 BLO i$ 
000012 000207 RTS PC 


; Routine Size: 6 words, Routine Base: ABSCODE$ + 12264 
; Maximum stack depth per invocation: 2 words 


; 3205 1 


Se ee eee ome 


;* 
-~_- . rr ee re — : - 


- ee re ee we 


113 


ee —_—— — . — ee — 


’ 
! 
' 
j 
’ 


, ZQNAS CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 oe 81 | 
'VO1.0 TEST 13 - MULTIPLE AND CHAINED PACKET TEST 14-Mer-1985 13:05:35 DISK $USER2: (MARSHALL .DEQNA]ZQNA3.B8LI;4 (31) 
‘ oaee : sSBTTL ‘TEST 13 - MULTIPLE AND CHAINED PACKET TEST’ | 
3 7° 
‘ 3208 1 ! 
: aoe : TEST 13: MULTIPLE AND CHAINED PACKET TEST 
; : 
' 3211 1 ! DESCRIPTION: 
’ 3212 1 H | 
$ 3213 1 : This test verifies thet the DEQNA cen transmit and receive multiple, 
: tp ; linked and chained loopbeck peckets. | 
; a 
; 3216 1 ! If the operetor specifies loop on error, the program re-executes the 
; ae. : code thet detected the error until tC is entered. 
i + 
$ 3219 1 ! Herdwere tested: 
; 3220 1 ! 
s mean & : Processing: 
: 3222 1 ! 
: 3223 1 ! BEGIN 
; 3224 1 ! reset device 
; 3225 1 ! select internal/extended loopback mode 
; 3226 1 ! trensmit simple loopback packet 
$ 3227 1 : check for expected loopback stetus 
$ 3228 1 : IF error 
; 32 1 : THEN 
; 3230 1 : print error message if not inhibited 
; 3231 1 ! IF 
: 32 1 ! call compere_peckets 
; 3233 1 ! 
: 3234 1 : trensmit multiple, linked and chaind loopback packet 
; 3235 1 : check for expected loopbeck status 
; 32 1 ! IF error 
; 3237 1 ! THEN 
; 32 i ! print error message if not inhibited 
; 3239 1 ! ENDIF 
: 3240 1 ! cell compere_packets 
; 3241 1 ! END 
$ 3242 1 !-- 
: 
: 


. = eee er ee ee 


J13 


SEQ <<” © 


SS SS SS SSS SV SSCS SeTeSESF OSes eoenoaeeaanaeuves eee eoeuneseeounen 


oO 
VII UU UT UT OU 0 0 0 00 0 td dd dd: 9 dd dt Gt Gd dd Gd Gt dd 


—_—_—— oo 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 13 - MULTIPLE AND CHAINED PACKET TEST 14-Mar-1985 13:05:35 


BGNTST; 


RBUF _LENGTH = 64; 
XBUF_LENGTH = - ( .RBUF_LENGTH f -1 ); 


tee 
! LOOPBACK UNCHAINED PACKET, THEN CHECK IF IT WAS PROPERLY RECEIVED 


RESET_DEQNA ( ); 
INCR INDEX FROM 0 TO 63 DO 
XMIT_BUFFER [ .INDEX ] = .INDEX; 


.XBUF_LENGTH, VE ); 
XBUF_LENGTH, VE ); 
ZERO ); 


BGNSUB ; 
INCR INDEX FROM O TO 63 DO 
RCV_O_LIST [ .INDEX, W_LEN ] = .RDI3 { .INDEX ]}; 
INCR INDEX FROM O TO 31 DO 
XMIT_D_LIST { .INDEX, W.LEN ) = .T013 { .INDEX ]; 


XMIT_D_LIST { 7, WLLEN ] = VE; 
XMIT_D_LIST { 13, W_LEN ) = E; 


PUT_BIT ({ CSR, LB, INX_LOOPBACK ]; 
XMIT_AND_RCV_PACKET ( ); 
CHK_RIXI_STATUS ( ZERO ); 
CHK_CSP_STATUS ( CSR_STATUS, CSR_MASK ); ! 0'100220’', 0'100220' 


XMIT_D_LIST { 7, WLLEN ] = V; 
XMIT_D_LIST { 12, WLLEN ] = NEWB; 
XMIT_D_LIST [ 13, WLLEN ] = V; 


.IOP_TABLE { XLO_ADR } = XMIT_D_LIST + 24; 
.IOP_TABLE [{ XHI_ADR ] = ZERO; 


CHK_RIXI_STATUS € ZERO ); 
CHK_CSR_STATUS ( CSR_ STATUS, CSR_MASK ); ! 0'100220',, 0'100220' 


See 
! CHECK IF RECEIVE BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 


14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 
DISK$USER2: [MARSHALL . DEQNA )ZQNA3.BLI;4 


i I< yf 5 ! 
| SEG 0166 . 
' ZGNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 

vO1.0 TEST 13 - MULTIPLE AND CHAINED PACKET TEST 14-Mar-1985 13:05:35 DISK $USER2: [MARSHALL . DEQNA)ZQNA3.BL1;4 (32) | 


INCR INDEX FROM 0 TO 53 CO 
IF .RCV_D_LIST { . INDEX, W_LEN ] NEQU .RD13 [ .INDEX } 
AND € .RCV_D_LIST { .INDEX, W_LEN ] AND #0‘'140000' ) NEQU #0’ 140000’ 

MD ACV_D_LIST { . INDEX, W_LEN ]) NEQU #0'020600' 


BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSGS9 ); 


- 


PRINTB ( MSG59 ); 


; 5 

$ 5 

; 5 

’ 5 

; 5 

$ 5 

; 6 

PF 6 

; 6 

; 3305 6 PRINTB € MSG48 ); 

$ 3306 6 PRINTB ( MSGSO, .RCV_D_LIST ( .INDEX, W_LEN ), .RDI3 { .INDEX J), .INDEX ); 
$ 3307 6 ERRDF ( 1301, MSGOO, ERRORSREPORT ); 

$ 3306 5 END; 

$ 3309 5 

$ 3310 5 tee 

; ote : ; CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 

; t-. 

; 3313 5 

; 3314 5 INCR INDEX FROM O TO 23 DO 

; 3315 5 IF .XMIT_D_LIST [{ .INDEX, W_LEN ]) NEQU .TD13 [{ .INDEX ]) 

; 3316 5 AND € .XMIT_D_LIST { .INDEX, W_LEN ) AND #0'140000' ) NEQU #0’ 146000’ 
; 3317 5 AND .XMIT_D_LIST [ .INDEX, W_LEN ]) NEQU #0'020414' 

; 3318 5 AND .XMIT_D_LIST [{ .INDEX, W_LEN ] NEQU #0‘004140' 

; 3319 5 THEN 

$ 3320 6 BEGIN 

$ 3321 6 CSR_WORD = GET_BIT (€ CSR_ALL ); 

$ 3322 6 PRINTB (€ MSGS5S9 ); 

; 3323 6 PRINTB ( MSG49 ); 

; 3324 6 PRINTB ( MSGSO, .XMIT_D_LIST { . INDEX, W_LEN J], .7013 { .INDEX J], .INDEX ); 
; 3325 6 ERRDF ( 1302, MSGOO, ERRORSREPORT ); 

; 3326 5 END; 

: 3327 «(5 

; 3328 5 INCR INDEX FROM O TO 5 DO 

$ 3329 6 BEGIN 

; 3330 6 XMIT_D_LIST { .INDEX, W_LEN ]) = .XMIT_D_LIST [ .INDEX + 24, W_LEN ); 
; 3331 6 RCV_D_LIST [ .INDEX, W_LEN ) = .RCV_O_LIST ({ .INDEX + 54, W_LEN ]; 

: 3332 5 END; 

; 3333 5 

: 3334 5 CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS ); ! 0'140000', 0'000400’' 

; a : CHK_RCV_STATUS ( RFLG_STATUS, RWD1_ STATUS ):; |! 0°140000', 0’'020000' 

3 

$ py a INCR INDEX FROM O TO 383 DO 

; 3338 5 IF .XMIT_BUFFER [ .INDEX ] NEQU .RCV_BUFFER [ .INDEX ] 

; 3339 5S THEN 

: 3340 6 BEGIN 

; 3341 ; CSR_WORD = GET_BIT ( CSR_ALL ); 

3 

: 3343 6 PRINTB ( MSGS1 ); 

: 3344 6 PRINTS ( MSGSO, .RCV_BUFFER [ .INDEX ]), .XMIT_BUFFER [ .INDEX ], .INDEX ); 
: 3345 : ERRDF ( 1303, MSGOO, ERRORSREPORT ); 

; 

; 3 
: 3 


re 
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CZQNADO DEQNA FUNCTIONAL TEST 
TEST 13 - MULTIPLE AND CHAINED PACKET TEST 


ENDTST; 


090000G 000000G 


$713: 


1$: 


2$: 


3$: 


4$: 
5$: 


6$: 


. SBTTL 
SR 


Las 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


—— —_——— eee . 


VAX-11 Bliss-16 V4.1-582 Page 
DISK $USER2: (MARSHALL .DEQNA}ZQNA3.8L1;4 


$T13 TEST 13 - MULTIPLE AND CHAINED PACKET TEST 


R1, $SAVES 


06 , SP 
#100, RBUF .LENGTH 
_ 


RO 
RO, XBUF .LENGTH 
PC ,,RESET .DEQNA 


RO 
again 
RO, #77 

1$ 


2 

XBUF .LENGTH, -(SP) 
@-60000, -(SP) 

PC, SET.RDESCR.LIST 
XBUF . LENGTH, (SP) 
@-60000, - (SP) 
PC,SET.XDESCR.LIST 


(SP) 
PC,SEND.ELOOP .PACKET 
ee 


67 
RO 


2$ 

oi Pon gual 6 DEQNA 
000, -CSP) 

Pc, ,CLR. BUFFERS 

pi ath 


RO, 0577 
3$ 


RD13(RO), RCV.D.LISTCRO) 
#2,R0 

RO, #176 

S$ 


RO 
TO135CRO),XMIT.D.LISTCRO) 
#2,RO 

RO, 076 

6$ 

#-60000, XMIT.D0.LIST+16 


#20000, XMIT.D.LIST+32 
REG.ADR,RO 


INDEX 


INDEX, *# 


INDEX 


INDEX 
INDEX, * 


; 

; INDEX, *C INDEX) 
: 

; 


INDEX 


*, INDEX 
INDEX, * 


el 


INDEX, * 


; 
; 

; INDEX, *C INDEX) 
; INDEX 

; 


3 

; 

; *C INDEX), eC INDEX) 
: 

8 


; INDEX 

3 — 
3 

: 


SEQ 0167 


84 
(32) 


M13 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


SEQ hi. 
QNA FUNCTIONAL TEST 168 


CZQNADO DE VAX-11 Bliss-16 V4.1-582 
TEST 13 - MULTIPLE AND CHAINED PACKET TEST 





001400 000016 
001000 000016 
000000G 


BIC #1400, 16(RO) 
BIS #1000, 16(RO) 


85 
DISK $USER2 : [MARSHALL .DEQNA)ZQNA3. eL1,8 (30) 


JSR PC, XMIT.AND.RCV.PACKET ; 3279 | 
CLR (SP) ; 3280 © 
JSR PC, CHK .RIXI.STATUS 
100220 MOV #-77560, (SP ; 3281 
MOV (SP),-CSP) 
JSR PC,CHK.CSR. STATUS . 
100000 0000166 MOV #-100000, XMIT.D.LIST+16 ; 3283 
100000 0000 MOV #- 100000, XMIT .D.LIST+30 : 3284 | 
100000 000032G MOV #-100000, XMIT.D.LIST+32 ; 3285 | 
000030G 0000106 MOV @XMIT.D.LIST+30,@I0P.TABLE-10_ ; 3287 | 
000012G CLR @IOP. TABLE+12 ; 3288 | 
CLR (SP) : 3290 | 
JSR PC, CHK.RIXI.STATUS | 
100220 MOV #-77560, (SP) ; 3291 
MOV (SP),-(SP) 
000000G JSR PC,CHK.CSR.STATUS 
CLR R3 ; INDEX 3297 
7$: MOV BS .R3 ; INDEX,* 3298 
at. 
000000G rae! RCV.D.LIST(R1),RO 
0000006 “~ RO,RDI3(R1) 
BEQ as 
MOV RO,R2 : 3299 
037777 BIC 037777 ,R2 
140000 CMP R2, @-40000 
BEQ 54 
020600 CMP RO, #20600 ; 3300 
BEQ 8$ 
000000G MOV REG.ADR,RO ; 3303 
000016 000006 MOV 16(RO),6(SP) ; *, TMP LOCATION 
000006 0000006 MOV 6(SP),CSR.WORD ; TMP.LOCATION, « 
000000G MOV 59, (SP) ; 3304 
000001 MOV #1,-CSP) 
MOV SP ,RO 3 SP ,* 
TRAP 14 
000000G MOV @MSG48 , (SP) : 3305 
000001 MOV #1,-C 
MOV 3 3 SP ,* 
TRAP 1 
MOV R3,(SP) ; INDEX,« 3306 
000000G MOV RD13(R1),-(SP) 
000000G MOV RCV.O.LIST(R1),-(SP) 
0000006 MOV @MSG50, -( SP) 
000004 MOV @4,-(SP) 
MOV SP ,RO : SP ,* 
TRAP 14 
TRAP 55 ; 3307 
.WORD 2425 
.WORD MSGOO 
.WORD ERRORSREPORT 
000014 ADD #14,SP ; 3302 


— cm le a = +e Lana ee rae ee et TS TTI I I —— <_<. «= 


N13 | 


SEQ 0169 
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TEST 13 - MULTIPLE AND CHAINED PACKET TEST 14-Mar-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA3.B8L1;4 (32) | 
} 
8$: INC R3 ; INDEX 3297 
000065 CMP R3,965 ; INDEX,*« 
BLE 7$ 
CLR R3 ; INDEX 3314 
9$: MOV R3,R1 ; INDEX,* 3315 
ASL R1 
0000006 MOV XMIT.D.LIST(R1),RO | 
000000G CMP RO, TD13(R1) | 
BEQ 10$ | 
MOV RO,R2 ; 3316 
037777 BI: 037777 ,R2 
140000 CMP R2, -40000 
BEQ 10$ 
020414 CMP RO, 020414 ; 3317 
BEQ 10$ 
004140 CMP RO, #4140 ; 3318 
BEQ 10$ 
0000006 MOV REG. ADR,RO : 3321 
000016 000010 MOV 16(RO),10(SP) ; *,TMP.LOCATION 
000010 000000G MOV 10(SP),CSR.WORD ; TMP.LOCATION, « 
000000G MOV @MSG59, (SP) ; 3322 
000001 MOV #1,-(SP) 
TRAP 14 
0000006 MOV @MSG49, (SP) ; 3323 
000001 MOV #1,-(SP) 
MOV SP ,RO 3 SP ,* 
TRAP 14 
MOV R3, (SP) ; INDEX,+ 3324 
0000006 MOV TO13(R1),-CSP) 
0000006 MOV XMIT.D.LISTCR1),-(SP) 
000000G MOV @MSG50, -( SP) 
000004 MOV 04,-(SP) 
MOV AR ; SP,* 
TRAP 14 
TRAP 55 ; 3325 
WORD 2426 
.WORD MSGOO 
.WORD ERRORSREPORT 
000014 ADD #14,SP ; 3320 
10$: INC R3 ; INDEX 3314 
000027 CMP R3,027 ; INDEX,« 
BLE 9$ 
CLR R2 ; INDEX 3328 
11$: MOV R2,RO ; INDEX,+ 3330 
ASL RO 
MOV R2,R1 ; INDEX,* 
ASL Ri 
000060G 0000006 MOV XMIT.D.LIST+60(R1),XMIT.D.LISTCRO) ; 
MoV R2. Ri ; INDEX,+ 3331 
000154G 0000006 MOV RCV.D.LIST+154(R1),RCV.D.LISTCRO) ; | 
INC R2 ; INDEX 3328 | 








B14 Sig 


7 ‘ 

| 2QNA CZQGNADO DEQGNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 my 87° 
vo1.0 TEST 135 - MULTIPLE AND CHAINED PACKET TEST 14-Mer-1985 13:05:35 DISK S$USER2: [MARSHALL .DEQNA]ZQNA3.BL1;4 (32)! 
001000 020227 900005 CMP R2,05 s INDEX,¢ 
001004 003760 BLE 11% 
001006 012716 140000 MOV @-40000,, (SP ) ‘ 3334 
001012 012746 000400 MOV #400, - (SP) 
001016 004737 0900000G JSR PC,CHK.XMIT.STATUS 
001022 012716 140000 MOV #-40000,, (SP) ; 3335 
001026 012746 020000 MOV #20000, -( SP) 
001032 004737 000000G JSR PC,CHK.RCV.STATUS 
001036 005001 CLR Ri ; INDEX 3337 
001040 126161 000000G 000000G 12$: CMPB XMIT.BUFFERCR1),RCV.BUFFERCR1) ; *#C INDEX), *C INDEX) 3338 
001046 001447 BEQ 13% 
001050 013700 000000G MOV REG. ADR ,RO i 3341 
001054 016066 000016 000016 MOV 16(RO),16(SP) ; *,1MP.LOCATION 
001062 016637 000016 000000G MOV 16(SP),CSR.WORD ; TMP .LOCATION,*+ 
001070 012716 000000G MOV @MSGS9, (SP) ; 3342 
001074 012746 000001 MOV #1,-CSP) 
001100 010600 MOV SP ,RO ; SP,* 
001102 104414 TRAP 14 
001104 012716 900000G MOV @MSG51, (SP) ; 3343 
001110 012746 000001 MOV #1,-CSP) 
001114 010600 MOV - SP,RO ; SP, 
001116 104414 TRAP i4 
001120 010116 MOV R1,CSP) ; INDEX, 3344 
001122 005046 CLR -(SP) 
001124 116116 000000G MOVB XMIT .BUFFERCR1), (SP) ; *CINDEX),+« 
001130 005046 CLR -(SP) 
001132 116116 000000G MOVB RCV .BUFFERCR1), (SP) ; *CINDEX),« 
001136 012746 ©000000G MOV @MSGSO, - CSP) 
001142 012746 000004 MOV #4,-(SP) 
001146 010600 MOV SP ,RO | ; SP,* 
001150 104414 TRAP i4 
001152 104455 TRAP $5 ; 3345 
001154 002427 -WORD 2427 
001156 000000G .WORD MSGOO 
001160 0000006 ‘ ERROR $SREPORT 
001162 062706 000014 AOD #14,SP ; 3340 
001166 005201 13$: INC Ri ; INDEX 3337 
001170 020127 000577 CMP R1,@577 :; INDEX, 
001174 003721 BLE 
001176 062706 000010 #10,SP : 

1202 104467 TRAP 6 : 3346 
001204 ROR 
001206 103002 BHIS 14% 
001210 000137 012464' JMP 4$ asee 


1214 062706 000010 14$: ADD #10,SP : 
1220 000207 RTS PC 


: Routine Size: 329 words, Routine Bese: ABSCODE$ + 12300 
; Maximum stack depth per invocation: 20 words 





000010 
000012 


; Routine Size: 


004737 
104466 


006000 
103773 
000207 


- = * LL ese eee SS ee eee wee - -— _— 


Ci4 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 my a8 | 
TEST 13 - MULTIPLE AND CHAINED PACKET TEST 14-Mar-1985 13:05:35 DISK$USER2: [MARSHALL .DEQNAJZQNA3.BL1;4 (32)! 
-SBTTL T13 TEST 13 - MULTIPLE AND CHAINED PACKET TEST 

012300’ Ti3:: 
i$: JSR PC,$T13 ; 3347 
TRAP 66 
ROR RO : 
BLO i$ 
RTS PC 
6 words, Routine Base: ABSCODE$ + 13522 


; Maximum steck depth per invocetion: 2 words 


5 3350 1 


Be be be be bee ee bee be bee bee fe ee be bee ee be fee ee ee ee ee be be bee bee ee ee fe ee ee bee ee ee bes ee ee ee ee ee ee ee 


p14 


14-Mar-1985 13:11:16 


CZQNADO DEQNA FUNCTIONAL TEST 
14-Mar-1985 13:05:35 


TEST 14 - DMA TIMING TEST 
sSBTTL ‘TEST 14 - DMA TIMING TEST’ 


TEST 14: DMA TIMING TEST 
DESCRIPTION: 


NOTE: An answer to the following software quastion 
SYSTEM HAS BLOCK MODE MEMORY (L)? 
determines the value for 'X'. 


Hardware tested: Internal/Extended loopback 


- error summary (bit 14) 
Processing: 


BEGIN 
reset device 
select internal/extended loopbeck mode 
set the timeout timer to ‘'X' msec 
transmit chained loopback packet 
start the timer 
IF timeout 
THEN 
Sina error message if not inhibited 


check for expected loopback status 
IF error 
THEN — 
print error message if not inhibited 
ENDIF 
cell compare_packets 
END 


ee | er me em eae 


VAX-11 Bliss-16 V4.1-582 


This test verifies that the DMA transfer completes within ‘'X' msec. 
Chained and linked 1514 byte loopback packet is used to accomplish 
this test. If the operator specifies loop on error, the program 
re-executes the code that detected the error until tC is entered. 


Transmit status - last descriptor in chain (bit 15) 
Receive status - last descriptor in chain (bit 15) 


oe See 
DISK$USER2: [MARSHALL .DEQNA]ZQNA3.6L1;4~ 


89 
(33) 


gene ee OS 
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CZQNADO DEQNA FUNCTIONAL TEST 
TEST 14 - DMA TIMING TEST 


BGNTS7 ; 
RBUF _LENGTH = LEGAL_LENGTH; 


XBUF_LENGTH = - ( .RBUF_LENGTH t -1 ); 
INCR INDEX FROM 0 TO LEGAL_LENGTH - 1 DO 


E14 


XMIT_BUFFER [ .INDEX J] = .INDEX; 


BGNSUB ; 
RESET .DEQNA ( ); 


INCR INDEX FROM 0 TO 63 00 

RCV_O_LIST ( .INDEX, W.LEN ] = .RD1I3 [ .INDEX ]; 
INCR INDEX FROM 0 TO 31 00 

XMIT_D_LIST [ O INDEX, W.LEN ]) = .T013 ({ .INDEX J; 


TEMPS = .XMIT_D_LIST ( 27, W_LEN ]; 
TEMP6 = .RCV_D_LIST [ 51, W_LEN ]; 
TEMP7 = .RCV_D_LIST [ 56, W_LEN ); 


XMIT_D_LIST { 27, WLLEN ] = -628; 
RCV_D_LIST [ 51, WLLEN ] = -625; 
RCV_D_LIST [ 56, WL.LEN ] = RCV_ BUFFER + LEGAL_LENGTH - 2; 


PUT_BIT { CSR, LB, INX_LOOPBACK J; 
XMIT_AND_RCV_PACKET ( ); 


CHK_RIXI_STATUS (€ ONE ); 
IF .SWP_BLOCK_MEM EQLU ONE 
THEN 


TEMP4 = #0'367' ! ADDED 258 TO “SOS” TO GET "367". FIX FOR $$$ 
ELSE . oo FROM 15 MHZ TO 18 MHZ CPU, BY HLM. $$$ 


TEMP4 = 4 * #£0'367’; 
IF .TEMP1 GTRU .TEMP4 
THEN 


BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSGS9 ); 
PRINTB ( MSGS2 ); 
—"” ( 1401, MSGOO, ERRORSREPORT ); 
; 


CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK ); ! 0'100220', 0'100220' 


XMIT_D_LIST ({ 27, WL_LEN ) = .TEMPS; 
RCV_D_LIST [ 51, WLLEN ] = .TEMP6; 
RCV_D_LIST [( 56, WLLEN ] = .TEMP7; 


See 
! CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 
Sos 
INCR INDEX FROM O TO 23 DO 
IF .XMIT_D_LIST { .INDEX, W_LEN ) NEQU .T013 ( .INDEX ] 


a me eee ee eee 
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SEQ 0173 


47° (34) 


—- - 


— 


ee I 


~“ 
~ 
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OE ae 


F14 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 von 
TEST 14 - DMA TIMING TEST 14-Mar-1985 13:05:35 DISK $USER2: [MARSHALL . DEQNAJZQNA3. BLI;4 
oe { .INDEX, W.LEN ] AND #0'140000' ) NEQU #0’ 140000’ 
BEGIN 

CSR_WORD = GET_BIT ( CSR_ALL ); 

PRINTB ( MSG59 ); 

PRINTB (€ MSG49 ); 

PRINTB € MSGSO, .XMIT_D_LIST ( .INDEX, W_LEN J], .17013 [ .INDEX J), .INDEX ); 

ERRDF ( 1402, MSGOO, ERROR$REPORT ); 


tee 


! CHECK IF RECEIVE BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 


INCR INDEX FROM 0 TO 53 DO 
IF .RCV_D_LIST { .INDEX, W.LEN j NEQU .RD13 [ .INDEX } 
AND (".RCV_D_LIST [ INDEX, W_LEN } AND #0'140000' ) NEGU #0’ 140000: 


BEGIN 
CSR_WORD = GET_BIT (€ CSR_ALL ); 
PRINTB (€ MSG59 ); 
PRINTB ( MSG48 ); 
PRINTB ( MSGSO, .RCV_D_LIST ({ .INDEX, W_LEN J], .RD13 ({ .INDEX J], .INDEX ); 
ERRDF ( 1403, MSGOO, ERRORSREPORT ); 

END; 

INCR INDEX FROM O TO 5S DO 
BEGIN 


TEMP1 = .INDEX + 24; 
TEMP2 = .INDEX + 54; 
XMIT_D_LIST { .INDEX, W_LEN ] = .XMIT_D_LIST [{ .TEMP1, W_LEN ]; 
RCV_D_LIST [ .INDEX, W_LEN ] = .RCV_D_LIST [ .TEMP2, W_LEN }; 


END; 
RBUF_LENGTH = 1514 
CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS ); ! 0'140000', 0'000400' 
CHK_RCV_STATUS ( RFLG_STATUS, RWDI1_STATUS ); ! 0'140000', 0'020000' 
INCR INDEX FROM O TO LEGAL_LENGTH - i DO 

IF .XMIT_BUFFER [ .INDEX ] NEQU “acy. BUFFER ({ .INDEX ] 


SR_WORD = GET_BIT (€ CSR_ALL ); 


PRINTB (€ MSG5S1 ); 
PRINTB (€ MSGSO, .RCV_BUFFER [ Bgl ), .XMIT_BUFFER [ .INDEX ), .INDEX ); 
ERRDF ( 1404, MSGOO, ERROR$REPORT ); 
END; 
ENDSUB ; 
ENDTST; 


.SBTTL $714 TEST 14 - DMA TIMING TEST 


‘ 
i 
' 
- 
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CZQNADO DEQNA FUNCTIONAL TEST 
TEST 14 - DMA TIMING TEST 


000000G $714: 
000010 

002752 
002752 


000000G 


000000G 1$: 


2$: 


000000G 3$: 
000000G 6$: 


000002 
000000G 


000000G 
000001 


G14 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


R1,$SAVE2 

#10,SP 

#2752 ,RBUF .LENGTH 
#2752 ,RO0 

RO 

RO 

oo aoe 
es er anes 


0 
RO, #2751 
1$ 


2 

oe 

RD13(RO),RCV.D.LISTCRO) 
#2,RO 

RO, #176 

ed 

7D13(RO), XMIT.D.LISTCRO) 
#2,RO0 

RO, 076 

XMIT.O.LIST+66, TEMPS 

RCV.D0.LIST+146, TEMP6 

RCV.D0.LIST+160, TEMP7 


#-1164,XMIT.D0.LIST+66 
#-1161,RCV.0.LIST+146 


@RCV. BUFFER +2750, »RCV.D.LIST+160 


6(RO) 
PC, XMIT. AND .RCV.PACKET 
#1,-CSP) 
PC CHK .RIXI.STATUS 
beeen 


#367, TEMP4 
6$ 


#1734, TEMP4 
TEMP1, TEMP4 


7$ 

REG. ADR,RO 
16(RO),2CSP) 
2(SP),CSR.WORD 
#MSG59, CSP) 
#1,-CSP) 


#MSGS2 , CSP ) 
#1,-CSP) 
SP ,RO 


= ae 


SEQ p0175 
VAX-11 Bliss-16 V4.1-582 Page 92) 
DISK $USER2: [MARSHALL .DEQNA)ZQNA3. BLI;4 (34)| 
; 3349 
; 3395 
$ 3396 | 
; INDEX —_ 
; INDEX, *C INDEX) 3396 | 
; INDEX 3397 
3 INDEX, * 
; 3398 
; 3401 
; INDEX 3402 
; SCINDEX), *C INDEX) 3403 
; *, INDEX 3402 
; INDEX,* 
; INDEX 3404 
; *C INDEX), *C( INDEX) 3405 
; *, INDEX 3404 
; INDEX, * 
; 3407 
H 3408 
3 3409 
; 3411 
; 3412 
; 3413 
; 3415 
, 3416 
; 3418 
, 3420 
. 3422 
; 3420 
; 3424 
; 3426 
, 3429 
; #*, TMP.LOCATION 
; TMP.LOCATION, * 
3430 
a SP ,* 
, 3431 
; SP,* 


Re A I 


ee 


H14 





SEQ 017 | 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 hing 93 | 
TEST 14 - DMA TIMING TEST 14-Mar-1985 13:05:35 § DISK$USER2:(MARSHALL.DEQNAJZQNA3.BLI;:4 (34) | 
TRAP 14 
TRAP 55 ; 3432 
WORD 2571 
.WORD MSGOO 
.WORD ERRORSREPORT : 
CMP (SP)+,CSP)+ ; 3428 
100220 7$: MOV #-77560, (SP) ; 3435 
MOV (SP),-CSP) | 
0000006 JSR PC,CHK.CSR.STATUS 
000000G 0000666 MOV TEMPS , XMIT.D.LIST+66 : 3437 
000000G 0001466 MOV TEMP6,RCV.D.LIST+146 ; 3438 
000000G 000160G MOV TEMP? ,RCV.D.LIST+160 ; 3439 
CLR R2 ; INDEX 3444 
8$: yong _ ; INDEX,* 3445 
0000006 0000006 ow XMIT.O.LISTCRL), T013(R1) 
0000006 MOV XMIT.D.LISTCR1),RO ; 3446 
037777 BIC #37777,RO 
140000 CMP RO, #-40000 
BEQ 9 
0000006 MOV REG. ADR,RO ; 3449 
000016 000006 MOV 16(RO),6(SP) ; *,TMP.LOCATION 
000006 0000006 MOV 6(SP),CSR.WORD ; TMP.LOCATION, « 
0000006 MOV #MSG59, (SP) ; 3450 
000001 MOV #1,-(SP) 
MOV SP ,RO ; SP,* 
TRAP 14 
0000006 MOV #MSG49, (SP) ; 3451 
000001 MOV #1,-CSP) 
MOV SP ,RO ; SP,* 
TRAP 14 
MOV R2,(SP) ; INDEX,* 3452 
0000006 MOV TD13(R1),-CSP) 
0000006 MOV XMIT.D.LISTCR1L), -(S°) 
0000006 MOV #MSG50, -(SP) 
000004 MOV #4,-(SP) 
MOV SP ,RO ; SP,* 
TRAP 14 
TRAP 55 ; 3453 
WORD 2572 
.WORD MSGOO 
.WORD ERROR$REPORT 
000014 ADD #14,SP ; 3448 
9$: INC R2 ; INDEX 3444 
000027 CMP R2,#27 ; INDEX,* 
BLE 8$ 
CLR R2 ; INDEX 3459 
10$: MOV R2,R1 ; INDEX, 3460 
ASL R1 
0000006 0000006 CMP RCV.D.LISTCR1),RD13(R1) 
BEQ 11$ 
0000006 MOV RCV.D.LISTCR1),RO : 3461 | 
} 
| 


ee rn 


owes ape LL LL Te, A TT TT mm - — -— —- - = 


114 


i 
SEQ 0177_—s 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 94) 
TEST 14 - DMA TIMING TEST 14-Mar-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNAJZQNA3.BL1;:4 (34) | 
! 
037777 BIC #37777,RO 
140000 CMP RO, #-40000 
BEQ 11$ 
0000006 MOV REG. ADR,RO ; 3464 
000016 000010 MOV 16(RO),10(SP) ; *, TMP. LOCATION 3 
000010 0000006 MOV 10(SP),CSR.WORD ; TMP.LOCATION, « 
0000006 MOV @MSG59, (SP) ; 3465 | 
000001 MOV #1,-C(SP) 
MOV SP ,RO ; SP,« 
TRAP 14 | 
0000006 MOV #MSG48, (SP) ; 3466 
000001 MOV #1,-(SP) 
MOV SP ,RO ; SP ,* 
TRAP 14 
MOV R2,(SP) ; INDEX, * 3467 
0000006 MOV RD1i3(R1),-CSP) 
0000006 MOV RCV.D.LIST(R1),-CSP) 
0000006 MOV #MSG5O, -(SP) 
000004 MOV #4,-(SP) 
MOV SP ,RO ; SP,* 
TRAP 14 
TRAP 55 ; 3468 
.WORD 2573 
.WORD MSGOO 
.WORD ERRORSREPORT 
000014 ADD #14,5P ; 3463 
11s: INC R2 ; INDEX 3459 
000065 CMP R2,065 ; INDEX,+ 
BLE 10$ 
CLR R2 ; INDEX 3471 
0000006 12$: MOV R2, TEMP1 ; INDEX, + 3473 
000030 0000006 ADD #30, TEMP1 
0000006 MOV R2, TEMP2 ; INDEX,* 3474 
000066 0000006 ADD #66, TEMP2 
MOV R2,RO ; INDEX,+ 3475 
; ASL RO 
000000G MOV TEMP1,R1 
ASL R1 
0000006 0000006 MOV XMIT.D.LIST(R1),XMIT.D.LISTCRO) 
000000G 0000006 MOV RCV.D.LISTCR1),RCV.D.LISTCRO) 
INC R2 ; INDEX 3471 
000005 CMP R2, 85 ; INDEX, * 
BLE 12$ 
002752 0000006 MOV #2752, RBUF .LENGTH ; 3479 
140000 MOV #-40000, (SP) ; 3480 
000400 MOV #400, -(SP) 
0000006 JSR PC, CHK. XMIT. STATUS 
140000 MOV #-40000, (SP) ; 3481 
020000 MOV #20000, -(SP) 
0000006 JSR PC, CHK. RCV. STATUS | 
CLR Ri ; INDEX 3483 | 
| 
| 





ee ee ee ee ne _—_— 


- — ee nn ll ee = ee ee SS ar NS 


J14 saint ee :. 


+: Routine Size: 6 words, Routine Base: ABSCODE$ + 15004 


| | 
7 i 
' ZQNA3 CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 _ ky 95 | 
v01.0 TEST 14 - DMA TIMING TEST 14-Mar-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BL1;4 (34) | 
j 
001064 126161 000000G 0000006 13$: CMPB XMIT.BUFFER(R1),RCV.BUFFER(R1) ; #*C INDEX), *C INDEX) 3484 | 
001072 001447 BEQ 14$ 
001074 013700 0000006 MOV REG.ADR,RO ; 3487 | 
001100 016066 000016 000016 MOV 16(RO),16(SP) ; *, TMP. LOCATION 
001106 016637 000016 0000006 MOV 16(SP),CSR.WORD ; TMP.LOCATION, « ! 
001114 012716 000000G MOV #MSG59, (SP) ; 3488 ! 
001120 012746 000001 MOV #1,-CSP) | 
001124 010600 MOV »RO ; SP,* | 
001126 104414 TRAP 14 
001130 012716 0000006 MOV #MSG51, (SP) ; 3409 | 
001134 012746 000001 MOV ,-(SP) 
001140 010600 MOV SP ,RO ; SP,* 
001142 104414 TRAP 14 
001144 010116 MOV R1,(SP) ; INDEX,* 3490 
001146 CLR -(SP) 
001150 116116 0000006 MOVB XMIT.BUFFER(R1), (SP) ; *CINDEX),* 
001154 CLR -(SP) 
001156 116116 000000G MOVE RCV. BUFFER(R1), (SP) ; *CINDEX),* 
001162 012746 000000G MOV #MSG5O, -( SP) 
001166 012746 000004 MOV #4,-(SP 
001172 Ol MOV SP,RO ; SP,* 
001174 104414 TRAP 14 
001176 104455 TRAP 55 ; 3491 
001200 002574 .WORD 2574 
001202 0000006 .WORD MSGOO 
001204 000000G .WORD ERRORSREPORT 
001206 062706 000014 ADD 014, ; 3486 
G01212 005201 14$; INC 1 ; INDEX 3483 
001214 020127 002751 CMP R1, 02751 ; INDEX,* 
001220 003721 BLE 34 
001222 062706 000010 ADD #10,SP ; 3398 
001226 104467 TRAP 67 ; 3492 
001230 006000 ROR RO 
001232 103002 BHIS 15% 
001234 000137 013606’ JMP 23 
001240 062706 000010 15$: ADO #10,SP ; 3349 
001244 000207 RTS 
; Routine Size: 339 words, Routine Base: ABSCODE$ + 13536 
; Meximum stack depth per invocation: 19 words 
.SBTTL 114 TEST 14 - DMA TIMING TEST 
004737 013536’ T14:: 
1$: JSR PC, $T14 : 3493 
104466 TRAP 456 
006000 ROR RO | 
103773 BLO i$ 
000207 RTS PC 
j 





—— ee ee, rr mn 


| ZQNA3 
/V01.0 


; Meximum steck depth per invocation: 2 words 


3496 1 


—— mt td aaa <a “a ae i a 


K14 


SEQ 0179 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 Vv4.1-582 Page 96° 
TEST 14 - OMA TIMING TEST 14-Mar-1985 13:05:35 DISK$USER2: [MARSHALL .DEQNAJZQNA3.8L1;4 (34)! 


————— 
———— << -<2~s-ane see cE tL ELE LL LL LOLOL ELL LAA 


Be be me be ae ae be be be be ee fe ae ae fee ee ee bee ee fee bee ee ee ee ee ee ee ee ee ee ee be be 


~~ —_— ieee ed 


L14 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 15 - LONG PACKET TEST 


SSBTTL ‘TEST 15 - LONG PACKET TEST‘ 


tee 
TEST 15: LONG PACKET TEST 
DESCRIPTION: 


This test verifies thet DEQNA can detect long packets ( 1600 bytes 
or more with the CRC ) when transmitted in internal/extended 
loopback mode. If the operator specifies loop on error, the ; 
progrem re-executes the code that detected the error until fC is 
entered. 


Herdwere tested: RCV Stetus - error summary (long packet-bit 14) 


Processing: 


BEGIN 
reset device 
select internal/extended loopback mode 
transmit loopbeck pecket (legal packet length) 
check for expected loopback status 
IF error 
THEN 


print error message if not inhibited 
IF 


ane t Seaseaeh an ket ( ket length > legal max. ) 
transmi packe pecket leng ega x. 
IF Error Summary bit ( Receice Status Word 1, bit 14 ) = 1 
AND (€ receive packet length is truncated ) 
THEN 
print error message if not inhibited 
IF 


END 


14-Mar-1985 13:11:16  VAX-11 Bliss-16 V4.1-582 age 
14-Mar-1985 13:05:35  DISK$USER2: (MARSHALL .OEQNA)ZQNA3.BLI;4 


EE EE 


' 


SEQ 0180 ; 
P 


97 | 
(35) | 


— 42 owe ee ru ee ~- —- < 


M14 


$ 
oO 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 “4 98 
TEST 15 - LONG PACKET TEST 14-Mar-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA3.6L1;4 (36) 
BGNTST; 
See 
! LOOPBACK 1534 BYTE PACKET AND THEN CHECK IF PROPERLY RECEIVED. 
! THIS IS THE LONGEST PACKET LENGTH WHICH DOESN’T SET ‘LONGP’ BIT IN 
THE RECEIVE STATUS WORD 1 ( BIT 14 ). 
RBUF_LENGTH = 1534; 
XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 
RESET_DE e 4 
SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
_ELOOP_PACKET ( ZERO ); 
COMPARE PACKETS ( ); 
ENDSUB; 
Ses 
' LOOPBACK 1536 BYTE PACKET AND THEN CHECK IF BITS 13 AND 14 ARE SET IN 
owe 
RBUF_LENGTH = 1536; 
XBUF_LENGTH = - ( .RBUF_LENGTH t -1 ); 
3 
RESET_DEQNA ( 
SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
SEND_ELOOP_PACKET ( ONE ); 
COMPARE _PACKETS ( ); 
ENDSUB ; 
ENDTST; 
-SBTTL $715 TEST 15 - LONG PACKET TEST 
012737 002776 000000G $715: MOV 02776, RBUF .LENGTH ; 3540 
012700 002776 MOV 02776,R0 ; 354) 
006200 ASR RO 
005400 NEG 
010037 000000G MOV RO, XBUF .LENGTH 
104402 1$: TRAP 2 
004737 000000G JSR PC, RESET .DEQNA ; 3544 
013746 000000G MOV UF .LENGTH, -( SP) ; 3545 
012746 120000 MOV #-60000, -( SP) 
004737 000000G JSR PC,SET.RDESCR.LIST . 
013716 000000G MOV XBUF .LENGTH, (SP) : 3546 
012746 120000 MOV #-60000, -( SP) 
004737 000000G JSR PC,SET.XDESCR.LIST 
005016 CLR (SP) : 3547 


—- + — oe aoe 


5 Routine Size: 
3 Maximum steck 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: 
; Meximum steck 


: 3568 
: 3569 


004737 
104466 
006000 


103773 
000207 


1 
1 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 15 - LONG PACKET TEST 


N14 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:25 


PC ,SEND.ELOOP .PACKET 
PC ,COMPARE .PACKETS 


67 
RO 


1$ 

#3000, RBUF .LENGTH 
#3000 ,RO 

RO 

RO 

ow 


PC ,,RESET .DEQNA 
XBUF .LENGTH, -( SP) 


#-60000, -( SP) 

XBUF .LENGTH, (SP) 
#-60000, * ) 
PC,SET.XDESCR.LIST 


SP) 
PC SEND .ELOOP .PACKET 
— 


67 
RO 
2$ 
PC 
+ 15020 


TiS TEST iS - LONG PACKET TEST 


000000G JSR 
000000G JSR 
000006 ADD 
TRAP 
ROR 
BLO 
003000 000000G MOV 
003000 MOV 
ASR 
NEG 
000000G MOV 
2$: TRAP 
000000G JSR 
000000G MOV 
120000 MOV 
000000G JSR 
000000G MOV 
120000 MOV 
000000G JSR 
000001 MOV 
000000G JSR 
000000G JSR 
000006 ADD 
TRAP 
ROR 
BLO 
RTS 
70 words, Routine Base: ABSCODES 
depth per invocation: 4 words 
SBTTL 
015020' T1i5:: 
i$: JSR 
TRAP 
ROR 
BLO 
RTS 
6 words, Routine Base: ABSCODES + 15234 


depth per invocation: 


2 words 


| 
SEQ 0182 
VAX-11 Bliss-16 V4.1-582 Page 99° 
DISK$USER2: (MARSHALL .DEQNAJZQNA3.BL1;4 (36)! 
‘ 3548 | 
; 3541 | 
$ 3548 | 
| 
$ 3556 
5 3557 | 
| 
| 
; 3560 | 
5 3561 
: 3565 


ee Bee tee bee bee ee be ee ee be bee bee ee be ee fe ee ee ee ee bee ee ee ee ee ee ee ee ee ee ee ee he ee he ee ee he eo he bee 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 16 - OOD PACKET TEST 


SSBTTL ‘TEST 16 - ODD PACKET TEST’ 


TEST 16: 
DESCRIPTION: 


Bis 


14-Mer-1985 13:11:16 
14-Mer-1985 13:05:35 


ODD PACKET TEST 


—_ ee ee ee eo «-« 


SEQ 0183 
VAX-11 Bliss-16 V4.1-562 Page 


100 © 
DISK $USER2: [MARSHALL . DEQNAJZQNA3. BLI;4" (37) 


This test verifies that DEQNA can transmit and receive odd length 

— end packets starting and/or ending on odd addresses. Chained 
end unchained descriptor lists ere used to verify this. If the operator 

specifies loop on error, the program re-executes the code that detected 


the error until tC is entered. 


Herdwere tested: 
Trensmit Descriptor bits 


CSR register - XMIT List Invalid (bit 4) 
- RCV List Invalid (bit 5) 


- XMIT buffer ends on odd byte 
- XMIT buffer ends on even byte 


Set of addresses and packet lengths: 
PACKET ADDRESS PACKET LENGTH 


odd in odd 
odd begin and end = 


Processing: 


BEGIN 
reset device 
REPEAT for internel and internel/extended loopbeck 
REPEAT for each packet address and length from set 
check for expected loopbeck status 
IF error 
THEN 
ee error message if not inhibited 


cell compare_packets 
ENDREPEAT 
ENDREPEAT 
END 


__ 


AAAUVUNUUMU UU UU 00 0 0 ddd dd dT dd ad dd dt tt Gt 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 16 - OOD PACKET TEST 


-— —_ J ————— eee 


LL 


BGNTST; 


tee 


RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM 


RESET_DEQNA ( ); 
PREP_FOR_SETUP ( ); 
INCR INDEX1 FROM 1 TO 14 DO 


WRT_STATION_ADR € .INDEX1, PHA_INDEX ); 


BGNSUB ; 
XMIT_SETUP_PACKET ( P_MODE ); 
ENDSUB; 


RBUF_LENGTH = 6; 
XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 


LOOPBACK A PACKET, THEN CHECK IF LOOPBACK PACKET WAS PROPERLY 


RECEIVED 


CLR_BUFFERS (€ 32 ); 
CLR_DESCR ( ); 
INCR INDEX FROM O TO 5 DO 


XMIT_BUFFER [ .INDEX ] = . INDEX; 


BGNS 


UB ; 
INCR INDEX FROM O TO 43 DO 

XMIT_D_LIST { .INDEX, W_LEN ) = .1D16 [ .INDEX ]; 
SET_RDESCR_LIST ( .XBUF_LENGTH, 23 
PUT_BIT [ CSR, LB, INT_LOOPBACK ]}; 


XMIT_AND_RCV_PACKET (€ ); 
CHK_RIXI_STATUS ( ONE ); 
.IOP_TABLE { CSR ] = ONE; 
CHK_RIXI_STATUS ( ZERO ); 
-IOP_TABLE [ CSR ] = ZERO; 


CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK ); : 0'100220', 0'100220' 


See 


* CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 


INCR INDEX FROM O TO 17 DO 
IF .XMIT_D_LIST ( .INDEX, W_LEN ] NEQU .TD16 [ .INDEX ] 
‘a { .INDEX, W_LEN ] AND #0'140000' ) NEQU #0’ 140000' 
BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSGS59 ); 


14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 
14-Mer-1985 13:05:35 DISK$USER2: [MARSHALL . DEQNA JZQNA3. BL1;4- 


SEQ i 


(38) 


—_— 


on Qe reee oe ee ooe 


Dis 


XMIT_DO_LIST [ 19, W_LEN ] = VE; 
XMIT_D_LIST [ 25, WLLEN ] = E; 


' CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 


INCR INDEX FROM O TO 35 DO 


SEQ 0185 | 
p 


QNA3 CZQNADO DEQGNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 age 102 
01.0 TEST 16 - ODD PACKET TEST 14-Mar-1985 13:05:35 DISK $USER2: [MARSHALL .DEQNA]ZQNA3.8LI;4 (38) 
3667 6 PRINTB ( MSG49 ); 
3668 6 PRINTB € MSGSO, .XMIT_D_LIST [ .INDEX, W_LEN ], .T016 ({ .INDEX J], .INDEX ); 
3669 6 ERRDF ( 1602, MSGOO, ERRORSREPORT ); 
3670 5 END; 
3671 5 
3672 5 
3673 5 INCR INDEX FROM O TO S DO 
a ; XMIT_D_LIST { .INDEX, W_LEN ]) = .XMIT_D_LIST [ .INDEX + 18, W_LEN ’- 
3676 5 CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS ); ! 0'140000', 0'000400' 
i : CHK_RCV_STATUS ( RFLG_STATUS, RWD13_STATUS ); ! 0’140000', 0'000000' 
3679 5 INCR INDEX FROM O TO 5 DO 
3680 5 IF .XMIT_BUFFER ([ .INDEX ] NEQU .RCV_BUFFER [ .INDEX ] 
3681 5 THEN 
3682 6 BEGIN 
3683 6 CSR_WORD = GET_BIT ( CSR_ALL ); 
3684 6 PRINTB (€ MSG59 ); 
3685 6 PRINTB ( MSG51i ); 
3686 6 PRINTB (€ MSG5O, .RCV_BUFFER ({ .INDEX ], .XMIT_BUFFER [ .INDEX J], .INDEX ); 
3687 6 ERRDF ( 1603, MSGOO, ERRORSREPORT ); 
3688 5 END; 
3689 3 ENDSUB ; 
3690 3 
3691 3 RESET_DEQNA ( ); 
3692 3 CLR_BUFFERS ( 32 ); 
3693 3 RBUF_LENGTH = 16; 
3694 3 XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 
3695 3 INCR INDEX FROM O TO 19 DO 
3696 3 XMIT_BUFFER ({ .INDEX ] = .INDEX; 
3697 3 
3698 5 BGNSUB ; 
3699 5 INCR INDEX FROM O TO 43 DO 
a : XMIT_D_LIST ({ .INDEX, W_LEN J] = .7T016 ({ .INDEX ]j; 
01 
3702 5 XMIT_D_LIST [{ 19, W_LEN ] = V; 
3703 5 XMIT_D_LIST ({ 25, W_LEN J] = C; 
3704 5 
3705 5 SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
3706 5 PUT_BIT ( CSR, LB, INX_LOOPBACK J; 
3707 5 XMIT_AND_RCV_PACKET (€ ); 
ies : CHK_RIXI_STATUS ( ZERO ); 
: CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK ); !' 0'100220', 0'100220' 
5 
5 
5 
5 
5 
5 
S 
5 


eee 


i 


- ee ee ee 
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ELS 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 16 - OOD PACKET TEST 


IF .XMIT_D_LIST ({ .INDEX, W_LEN J] NEQU .TD16 [ .INDEX ] 
AND ( .XMIT_D_LIST { .INDEX, W_LEN ] AND #0'140000' ) NEQU #0‘ 140000' 


THEN 
BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSGS9 ); 
PRINTB € MSG49 ); 
PRINTB ( MSGSO, 'XMIT -D_LIST { .INDEX, W_LEN J], .7016 [ .INDEX J], .INDEX ); 
—_—" ( 1604, MSGOO, ERROR$REPORT ); 
3 


INCR INDEX FROM 0 TO 5 DO 
XMIT_D_LIST ({ .INDEX, WLLEN ) = .XMIT_D_LIST ( .INDEX + 36, W_LEN J; 


CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS ); ! 0'140000', 0'000400' 
CHK_RCV_STATUS ( RFLG_STATUS, RWDI_STATUS ); ! 0'140000' , 0'020000' 


INCR INDEX FROM O TO 5 DO 
*——— { .INDEX ] NEQU .RCV_BUFFER [ .INDEX ] 


BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSG59 ); 
PRINTB (€ MSG51 ); 
PRINTB (€ MSG5O, "RCV_BUFFER { .INDEX J], .XMIT_BUFFER [ .INDEX J], .INDEX ); 
ERRDF ( 1605, MSGOO, ERRORSREPORT ); 


INCR INDEX FROM 6 TO 9 DO 
* on _BUFFER [ .INDEX ] NEQU ZERO 


BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB € MSGS5S9 ); 
PRINTB ( MSG51 ); 
PRINTB : Saas MSGSO, .RCV_BUFFER { .INDEX J], .XMIT_BUFFER [ .INDEX ], -.INDEX ); 


ERRDF » MSGOO, ERRORS$REPORT ); 
END; 


INCR INDEX FROM 0 TO 5 DO 
‘a { .INDEX + 10 ] NEQU .TARGET_ADR [ .INDEX + 114 ] 


BEGIN 
CSR_WORD = GET oy ( CSR_ALL ); 


PRINTB ( MSG51 ); 
PRINTB ( MSG5SO, .RCV_BUFFER [ wg ), .XMIT_BUFFER ({ .INDEX J], .INDEX ); 
ERRDF ( 1607, MSGOO, ERROR$REPORT ); 
$ 
ENDSUB ; 
ENDTST; 


14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 1 
14-Mar-1985 13:05:35 DISK$USER2: [MARSHALL . DEQNA JZQNA3. BLI;4 (38) 


——_ eee ee ee 


— 


SEQ —. on | 
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CZQNADO DEQNA FUNCTIONAL TEST 


TEST 16 - ODD PACKET TEST 


000016 


000016G 


$T16: 


i$: 


2$: 


3$: 


4$: 
5$: 


JS 


Fis 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


-SBTTL $1716 TEST 16 - ODD PACKET TEST 
R AVE2 


#14 ,SP 

PC ,RESET .DEQNA 

PC ,PREP .FOR.SETUP 
#1,R1 

Ri, -CSP) 


#23 ,-CSP) 
PC,WRT.STATION. ADR 
datas 


R1, #16 
1$ 


2 
PC, XMIT.SETUP .PACKET 
CSP )- 


67 
RO 


2$ 
#6 ,RBUF .LENGTH 
RO 


RO 

RO, XBUF .LENGTH 
#40, -(SP) 
PC,CLR.BUFFERS 
tse 
eel acim 


RO,#5 
3% 
2 


RO 

TDI6CRO), XMIT.D.LISTCRO) 
#2,RO0 

> aa 

XBUF .LENGTH, (SP) 
#-60000, -(SP) 
PC,SET.RDESCR.LIST 
REG.ADR,RO 

#1400, 16(RO) 
PC,XMIT.AND.RCV.PACKET 
#1,(SP) 


PC,CHK .RIXI.STATUS 
#1,@I10P . TABLE +16 


(SP) 
PC,CHK .RIXI.STATUS 
@IOP . TABLE +16 


VAX-11 Bliss-16 V4.1-582 P 
DISK $USER2 : [MARSHALL .DEQNA)7QNA3.B8L1;4 


*, INDEX1 
INDEX1,* 


INDEX1 
INDEX1 


INDEX 
INDEX, 
INDEX 
INDEX, 


*,1I 
INDEX, 


INDEX 
*(C INDE 
NDE 


nr rrr eee” 


SEQ 0187 
104 | 
(38) 


3621 | 


»* 


*C INDEX) 


eee 


oF 


: 
. LLL LLL ELL LLL LLL, LLL —— eee 


i ediieatiiediantinad rc rrr cee ee a ee se —-— ——- 


-——— eee ’ 


ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-S582 yo 

v0O1.0 TEST 16 - ODD PACKET TEST 14-Mar-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNAJZQNA3.B8L1:4 (38) 

000254 012716 100220 MOV #-77560,< SP) ; 3654 

009260 011646 MOV (SP),-CSP. 

0C0262 004737 000000G JSR PC,CHK.CSR.STATUS 

000266 005002 CLR R2 ; INDEX 3660 

000270 010201 MOV R2,R1i ; INDEX, * 3661 | 
000272 006301 ASL Ri 

000274 026161 000000G 000000G CMP XMIT.D.LISTCR1), TO16(R1) 

000302 001454 BEQ 7$ 

000 016100 MOV XMIT.D.LISTCR1I),RO ; 3662 
000310 27 037777 BIC 037777,RO 

000314 020027 140000 CMP RO, #-40000 

000320 001445 BEQ 7$ 

000322 013700 MOV REG. ADR,RO ; 3665 
000326 016066 000016 000006 MOV 16(RO),6C(SP) ; *,TMP.LOCATION 

000334 016637 0000006 MOV 6(SP),CSR.WORD ; TMP.LOCATION, + 

000 012716 MOV #MSG59, (SP) ; 3666 
000346 012746 000001 MOV #1,-CSP) 

000352 010600 MOV SP,RO ; SP,* 

000354 104414 TRAP 14 

000356 012716 000000G MOV #MSG49, (SP) ; 3667 
000362 012746 000001 MOV #1,-CSP) 

000 01 MOV SP,RO ; SP,* 

000370 104414 TRAP 14 

000372 010216 MOV R2,(SP) ; INDEX,* 3668 
000374 016146 000000G MOV TD16(R1),-CSP) 

000400 016146 000000G MOV XMIT.D.LISTCR1),-C(SP) 

000404 012746 0000006 MOV #MSG50, -( SP) 

000410 012746 000004 MOV #4,-(SP) 

000414 010600 MOV SP ,RO ; SP,* 

000416 104414 TRAP 14 

000420 104455 TRAP 55 : 3669 
000422 003102 .WORD 3102 

000424 .WORD MSGOO 

000426 .WORD ERRORSREPORT 

000430 062706 000014 ADD #14,SP : 3664 
000434 005202 INC Re ; INDEX 3660 
000436 020227 000021 CMP R2,021 ; INDEX,* 

000442 003712 BLE 6$ 

000444 005002 CLR R2 ; INDEX 3673 
000446 010201 MOV R2,R1 ; INDEX, * 3674 
000450 301 ASL Ri 

000452 010200 MOV R2,RO0 ; INDEX,« 

900454 300 ASL RO 

900456 016061 000044G 000000G MOV XMIT.D.LIST+44(RO),XMIT.D.LISTCR1) ; 

000464 005202 INC R2 ; INDEX 3673 
900466 020227 000005 CMP R2,85 ; INDEX,* 

000472 003765 BLE 8$ 

000474 012716 140000 MOV #-40000, (SP) ; 3676 
900500 012746 000400 MOV #400, -(SP) 

s005C 73 JSR PC,CHK.XMIT.STATUS 

900510 012716 140000 MOV #-40000, (SP) ; 3677 
090514 005046 CLR -(SP) 

000516 004737 000000G JSR PC,CHK.RCV.STATUS 


. eee ee ee 


LL A A i El et -—— 


SEQ 0189 





CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 106! 
TEST 16 - ODD PACKET TEST 14-Mar-1985 13:05:35 DISK$USER2: [MARSHALL .DEQNAJZQNA3.BL1:4 (38) | 
CLR Ri ; INDEX 3679 
000000G 0000006 9$: cree MATT .GUFPERCR1).RCV.BUFFERCR3 D ; *C INDEX), *C INDEX) 3680 
0000006 MOV REG. ADR,RO ; 3683 
000016 000014 MOV 16(RO),14(SP) ; *,TMP.LOCATION 
000014 000000G MOV 14(SP),CSR.WORD ; TMP.LOCATION, » | 
0000006 MOV #MSG59, (SP) ; 3684 
000001 MOV #1,-CSP 
MOV SP,RO ; SP,* 
TRAP 14 
0000006 MOV #MSG51, (SP) ; 3685 
000001 MOV #1,-CSP) 
MOV SP,RO ; SP,* 
TRAP 14 
MOV R1i,(SP) ; INDEX,* 3686 
CLR -(SP) 
0000006 nove WHET BUPFERCRA). (SP? ; *CINDEX),* 
0000006 MOVB RCV.BUFFERC(R1), (SP) ; *C INDEX), * 
0000006 MOV #MSG50, -( SP) 
000004 MOV #4,-(SP) 
MOV SP ,RO ; SP,* 
TRAP 14 
TRAP 55 ; 3687 
.WORD 3103 
. WORD 
.WORD ERRORSREPORT 
000014 ADD #14,SP ; 3682 
i0$: INC Ri ; INDEX 3679 
000005 CMP R1,#5 ; INDEX, * 
BLE g 
000010 ADD #10,SP ; 3640 
TRAP 67 : 3688 
ROR RO 
BHIS 11$ 
015416' JMP 4$ 
11$: JSR PC, RESET .DEQNA ; 3691 
000040 MOV #40,(SP) : 3692 
000000G JSR PC,CLR. BUFFERS 
000020 0000006 MOV #20, RBUF .LENGTH ; 3693 
000020 MOV #20,RO0 ; 3694 
ASR RO 
NEG RO 
000000G MOV RO, XBUF .LENGTH 
CLR RO ; INDEX 3695 
0000006 12$: MOVB RO, XMIT.BUFFERCRO) ; INDEX, *( INDEX) 3696 
INC RO ; INDEX 3695 
000023 CMP RO, #23 ; INDEX, * 
BLE 12$ 
13$: TRAP 2 : 3696 
CLR RO ; INDEX 99 
000000G 0000006 14$: MOV TD16(RO),XMIT.D.LISTCRO) ; *C INDEX), *C INDEX) 3700 | 
000002 ADD #2,RO0 ; *, INDEX 





——_— — oe « 


ee el ET a ee ee 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 16 - ODD PACKET TEST 


000126 


000016 


000062G 
iS$: 


000012 
000000G 


000014 
16$: 


Lis 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


— 

#- 100000 , XMIT.D.LIST+46 
#40000 , XMIT.D.LIST+62 
XBUF .LENGTH, (SP) 
#-60000, -( SP) 

PC,SET. RDESCR.LIST 

REG. AOR, RO 

#1400, 16(RO) 

#1000 , 16(RO) 

PC. xMIT AND .RCV.PACKET 


CSP 

PC, CHK .RIXI.STATUS 
#-77560, (SP) 

PC ,CHK.CSR.STATUS 
#-60000 , XMIT.D.LIST+46 
> nec iiact tal canst 


a 
XMIT.O.LISTCR1), TO16CR1) 


16% 
XMIT.D.LISTCR1),RO 
037777 ,RO 


R2,(SP) 
TDO1I6(R1),-CSP) 
XMIT.O.LISTCR1),-CSP) 
#MSGS5O P) 


MSGOO 

ERROR $REPORT 
#14,SP 

Re 


R2, #43 
15$ ‘ 


A A AL SN 


—_——— rr cre ee ee eee —_—_—_— 


SEQ A 
VAX-i1 Bliss-16 V4.1-582 


i 
} 
so7! 
DISK$USER2: [MARSHALL . DEQNA)ZQNA3. L144 ao 38) | 
; INDEX,* | 


| 3702 
i 3703 | 
; 3705 | 
$ 3706 
; 3707 
; 3708 
5 3710 
; 3712 
; 3713 
; INDEX 3719 
; INDEX,* 3720 
F 3721 
3 3724 
3; *, TMP e LOCATION 

; TMP .LOCATION, + 

; 3725 
Hy SP »* 

$ 3726 
; SP,« 

; INDEX,* 3727 
; SP, 

; 3728 
; 3723 
; INDEX 3719 
; INDEX, # 





ae Sle ee 


J15 mage oe 





CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 - Asal 
TEST 16 - ODD PACKET TEST 14-Mar-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA3. pur, (38) | 
005002 CLR R2 ; INDEX 3731 | 
010201 17$: MOV R2,R1 ; INDEX, 3732 
006301 ASL Ri | 
010200 MOV R2,RO ; INDEX,*« 
300 ASL RO 
016061 000110G 0000006 MOV XMIT.D.LIST+110(RO),XMIT.D.LISTCRI) ; 
005202 INC R2 ; INDEX 3731 | 
27 000005 CMP R2,05 ; INDEX,*« 
003765 BLE 17$ 
012716 140000 MOV #-40000, (SP) ; 3734 | 
012746 000400 MOV #400, -(SP) 
004737 0000006 JSR PC, CHK. XMIT. STATUS 
012716 140000 MOV #-40000, (SP) ; 3735 
012746 020000 MOV #20000, -( SP) 
004737 0000006 JSR PC,CHK.RCV.STATUS 
CLR Ri ; INDEX 3738 
126161 000000G 000000G 18$: CMPB XMIT.BUFFERCR1),RCV.BUFFER(R1) ; #C INDEX), *CINCEX) 3739 
001447 BEQ 19$ 
013700 MOV REG.ADR,RO ; 3742 
016066 000016 000020 MOV 16(RO),20(SP) ; *, TMP. LOCATION 
016637 000020 0000006 MOV 20(SP),CSR.WORD ; TMP.LOCATION, « 
012716 0000006 MOV @MSG59, (SP) ; 3743 
012746 000001 MOV #1,-(SP) 
010600 MOV SP,RO ; SP,* 
104414 TRAP 14 
012716 MOV #MSG51, (SP) ; 3744 
012746 000001 MOV #1,-C(SP) 
010600 MOV SP, ; SP,* 
104414 TRAP 14 
010116 MOV R1,(SP) ; INDEX, + 3745 
CLR -(SP) 
116116 0000006 nove XMIT . BUFFER(R1), (SP) ; *C(INDEX),+« 
116116 0000006 MOVB RCV. BUFFER(R1), (SP) ; *CINDEX),« 
012746 000000G MOV #15650. -(SP) 
012746 000004 MOV #4, -(SP) 
010600 MOV SP.RO ; SP,« 
104414 TRAP 14 
104455 TRAP 55 ; 3746 
003105 WORD 3105 
. WORD 
WORD ERRORSREPORT 
062706 000014 ADD #14,SP ; 374} 
00520 19$: INC Ri ; INDEX 3738 
020127 000005 CMP R1,¢5 ; INDEX,* 
003721 BLE 18$ 
012701 000006 MOV #6,R1 ; *, INDEX 3749 
105761 0000006 20$: TSTB RCV. BUFFER(RL) ; *CINDEX) 3750 
001447 BEQ 21$ 
013700 0000006 MOV REG. ADR, RO ; 3753 | 
016066 000016 000022 MOV 16(RO),22(SP) ; *, TMP.LOCATION 
016637 000022 0000006 MOV 22(SP),CSR.WORD ; TMP.LOCATION, * 
012716 MOV #MSG59, (SP) ; 3754 | 





o meme lcm al a ee a 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 16 - ODD PACKET TEST 


000001 


000000G 
000001 


21$: 
000012G 000162G 22$: 


000024 
000000G 


000014 


K15 


14-Mar-1985 13:11:16 
14-Mer-1985 13:05:35 


#1,-(SP) 


i 

#MSG51, (CSP) 
#1,-CSP) 
SP,RO 


14 

Ri, (SP) 

-(SP) 
XMIT.BUFFERCR1),(CSP) 


-(SP) 
RCV.BUFFERCR1i), (CSP) 
#MSG50,-CSP) 
em 


14 
55 
3106 

MSGOO 
a 


Ri, #11 
20$ 


Ri ; INDEX 
RCV .BUFFER+12(R1), TARGET.ADR+162(R1) ; 


23% 
REG.ADR,RO 
16(RO),24(SP) 


14 

ies 

XMIT .BUFFERCR1), (CSP) 
-(SP) 


RCV.BUFFERCR1), (CSP) 


MSGOO 
ERROR $REPORT 
#14,SP 


j 

j 

SEQ 019 

VAN 11 108-16 VASO as 012 18, 
; SP,*# | 
i 3755 
; SP,* 
; INDEX,* sen | 


H] *CINDEX),* 
‘ *CINDEX),* 


; SP,* 


3760 
3761 
3764 


; *C INDEX), *C INDEX) 


+, TMP .LOCATION 
TMP .LOCATION, + 


3765 
; SP, 

3 3766 
; SP,* 

; INDEX, 

; *CINDEX),* 
; *CINDEX),«# 


3767 


; SP,* 
; 3768 


: 3763 


; 3757 
5 3752 
; INDEX 3749 
; INDEX,* 
| 
| 
i 
| 


s Routine Size: 
; Maximum steck 


000000 
000000 
000004 
000006 
000010 
000012 


+ Routine Size: 
; Meximum stack 


004737 
104466 


006000 
103773 
000207 


$ 3773 1 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 16 - ODD PACKET TEST 


23%: 
000005 
900010 
016224' 
000016 24$: 
525 words ° 


depth per invocation: 22 wor 


015250' T16:: 


i$: 


6 words, 


depth per invocation: 2 wo 


Routine a Se 


¢ 15250 


T16 TEST 16 - ODD PACKET TEST 


PC,$T16 
66 


Routine Base: ABSCODE$ + 17302 
rds 


LAS 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


SEQ 019 

VAX-11 Sliss-16 V4.1-582 Pees 110: 
DISK$USER2: (MARSHALL .DEQNA)ZQNA3.8L1I;4 (38) | 

j 
; Ind’ 3760 
3 IND: -s* | 
; 3696 | 
3 3769 
; 3567 | 


; 


ee ee te ee | 


te 
s 
Be ee be ee re ee he ee ee ee ee ee ee bee be et be Be tee te te ee Bee ta fee ee ee ee ee fe ee ee ee ee ee ee ee ee ee bee ee 
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CZQNADO DEQNA FUNCTIONAL TEST 
TEST 17 - STATION ADDRESS TEST 


sSBTTL ‘TEST 17 - STATION ADDRESS TEST’ 


See 


TEST 17: STATION ADDRESS TEST 
DESCRIPTION: 


This test verifies thet DEQNA accepts only peckets with legitimate 
‘multicast’ and ‘non-multicest’' eddresses and discards those with 
illegitimate ‘multicast’ and 'non-multiceast' eddresses. 


Station Address RAM is loaded with e set of Target Addresses and 
Mode bits. Target Addresses in and out of the set ere used to 
loopback packets. If the operator specifies loop on error, the 
— re-executes the code thet detected the error until fC is 
entered. 


Herdwere tested: Address Filter Circuitry 
Set of ‘multicest' addresses in HEXADECIMAL: 


01-00-00-00-00-00 
AB-AA-AA-AA-AA-AA 
55-55-55-55-55-55 
FF -FF-FF -FF -FF -FF 
Welking 1 


Processing: 


BEGIN 
reset device 
select internal loopback mode 
set mode to Setup 
load Station Address RAM with ‘multicest' eddresses 
REPEAT for each complemented and uncomplemented ‘multicast’ 
eddress in the set 
loed address 
disable receiver 
transmit loopbeck pecket 
enable receiver 
check for expected loopbeck stetus 
IF error 
THEN 
error message if not inhibited 


call compere_peckets 
ENDREPEAT 
END 


SEQ 0194 


14-Mer-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 
14-Mer-1985 13:05:35 DISK $USER2 : [MARSHALL . DEQNA )ZQNA3.BL1;4 


111. 
(39) | 


_——— ee 


3 
Oo 
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CZQNADO DEQNA FUNCTIONAL TEST 
TEST 17 - STATION ADDRESS TEST 
BGNTST; 


See 
RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM TO ALL MULTICAST 


RESET_DEQNA ( ); 

PREP_FOR_SETUP ( ): 

INCR INDEX1 FROM 6 TO 19 DO 
WRT_STATION_ADR ( .INDEX1 - 5S, .INDEX1 ); 


BGNSUB ; 
‘ XMIT_SETUP_PACKET ( N_MODE ); 
$ 


tee 


! NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 


RBUF _LENGTH = 6; 
XBUF _LENGTH = - ( .RBUF_LENGTH f -1 ); 


~~ FROM 6 TO 19 DO 
WRT_STATION_ADR € ZERO, .INDEX1 ); 


BGNSUB ; 
XMIT_ILOOP_PACKET ( ZERO ); 
SUB; 


oe INDEX2 FROM 0 TO 5 DO 


GIN 
XMIT_BUFFER 4 Fa ag J = .XMIT_BUFFER { .INDEX2 ] ) - 1; 
a f » 3? weit _BUFFER ( .INDEX2 }; 

; 


BGNSUB ; 
¥MIT_ILOOP_PACKET (€ ONE ); 
SUB; 
END; 
TEMP4 = 14 
INCR INDEX3 FROM O TO 3 DO 
BEGIN 
IF .INDEX3 EQLU 3 
THEN 
RESET_DEQNA ( é . , 
INCR INDEX4 FROM 1 TO .TEMP4 DO 


BEGIN 
WALKING_BIT ( ZERO, .INDEX4 + ( .INDEX3 « 14 )-1, 5 ); 


es ee CE ee 


——— —— — ——— —_ - —_— — 


S 
14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 “ Pons 112 
14-Mer-1985 13:05:35 DISK$USER2: [MARSHALL .DEQNA)ZQNA3. BLI;4 


— 


oe 


B16 


VAX-11 Bliss-16 V4.1-S582 


—-— —— - 


SEQ ——. “4 
| 


DISK $USER2: [MARSHALL . DEQNA)ZQNA3. eLI,a™" (40 


ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 
vo1.0 TEST 17 - STATION ADDRESS TEST 14-Mer-1985 13:05:35 
: 3876 5 WRT_STATION_ADR ( .INDEX4, ZERO ); 
: 3877 4 5 
3 3878 4 
$ 3879 6 BGNSUB ; 
; 3880 6 XMIT_SETUP_PACKET (€ N_MODE ); 
; 3861 4 5 
: 3882 4 
3 38683 4 RBUF _LENGTH = 6; 
$ aoa ; XBUF _LENGTH = - ( .RBUF_LENGTH ft -1 ); 
; 
; 3886 4 INCR INDEX4 FROM 1 TO .TEMP4 DO 
; 3887 5S BEGIN 
3 3888 5 WALKING_BIT € ZERO, .INDE%4 + ( .INDEX3 * 14 )-1, 5 J); 
$ 3889 5 WRT_STATION_ADR (€ ZERO, ZERO ); 
$ 3890 (5 
3 3891 7 BGNSUB ; 
$ 7 XMIT_ILOOP_PACKET ( ZERO ); 
8 3893 5 ENDSUB ; 
: 3894 4 END; 
; 3895 4 
8 4 INCR INDEX2 FROM O TO 5 DO 
8 3897 5 BEGIN 
8 38698 5 XMIT_BUFFER { .INDEX2 ] = ( -.XMIT_BUFFER [ .INDEX2 ] ) - 1; 
3 3899 5 TARGET_ADR { .INDEX2 ] = .XMIT_BUFFER [ .INDEX2 ]; 
$ 3900 5 
$ 3901 7 BGNSUB ; 
3 3902 7 XMIT_ILOOP_PACKET ( ONE ); 
3 3903 5 3 
8 3904 4 END; 
3 3905 3 ; 
8 3906 3 
$ 3907 3 INCR INDEX2 FROM O TO 5S DO 
5 3908 3 TARGET_ADR { .INDEX2 ] = ZERO; 
$ 3909 3 
: 3910 1 ENDTST; 
-SOTTL $717 TEST 17 - STATION ADDRESS TEST 
000000 004137 000000G $T17: JSR Ri, $SAVE4 ; 
000004 004737 000000G JSR PC ,RESET .DEQNA : 
000010 004737 000000G JSR PC. PREP .FOR. SETUP : 
900014 012701 000006 MOV 96 ,R1 ; *, INDEX1 
000020 010146 1$: MOV R1,-CSP) ; INDEX1,+* 
000022 162716 000005 SUB #5,(SP) 
900026 010146 MOV R1,-CSP) ; INDEX1,# 
500030 004737 000000G JSR PC,WRT.STATION.ADR 
000034 022626 CMP CSP)+,(CSP)- 
900036 005201 INC Ri ; INDEX1 
900040 020127 000023 CMP R1,¢23 ; INDEX1,+* 
5000 003765 BLE i$ 
90004E 1044G2 2$: TRAP 2 ° 
000050 012746 000200 MOV #200, -C SP) : 
900054 004737 000000G JSR PC,XMIT.SETUP.PACKET 


——— <— —_— — 
. 


—_—<—- 


D00310 


——— « 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 17 - STATION ADDRESS TEST 


000006 0000006 
000006 


000000G 
177777 


000005 


000001 
000000G 


———— <= — —— seme 


3$: 


4$: 


5$: 


6$: 


7$: 
8$: 


Ci6 


14-Mar-1965 13:11:16 
14-Mar-1985 13:05:35 


2 

#6 ,RBUF .LENGTH 
#6,RO0 

RO 

RO 

RO, XBUF .LENGTH 

#6 ,R2 

-(SP) 

R2,-CSP) 

- ecpsiteen tail 


CSP) 
eee lata lima 


RO 
4$ 


RO 
#XMIT .BUFFER,R1 
eR1 
#-1 »R3 

R4 

CR1),R4 

a 3 

R3,CR1) 

R3, TARGET . ADRCRO) 
RO 

RO, #5 

S$ 

2 

#1,(SP) 

+ plac aaualaitimtaall 
RO 

6$ 

CSP)+,(SP)+ 

R2 

R2,%23 

3$ 

#16, TEMP4 

R4 

00, #3 

8$ 

#6, TEMP4 

PC ,,RESET .DEQNA 

PC PREP .FOR.SETUP 
TEMP4 ,R2 

R4,R1 

#16,R1 

R3 


10$ 


VAX-11 Bliss-16 V4.1-582 Page 
DISK$USER2: [MARSHALL . DEQNA)ZQNA3.BL1;4 


*, INDEX1 
INDEX1, * 


INDEX2 
INDEX2, * 


*, *C INDEX2) 
INDEX2 
INDEX2, * 


INDEX1 
INDEX1,* 


INDEXS 


INDEXS, * 
INDEX4 


SEQ 0197s 
14! 


1 
(40) 


3833 
3836 


i 
3843 | 
3844 


3846 
3848 


3851 


3854 
3856 


3857 
3854 


012702 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 17 - STATION ADDRESS TEST 


9$: 
000005 
000000G 
000000G 
000010 
10$: 


1i$: 
000200 
000000G 


12$: 
000005 
000000G 


13$: 


000010 
14$: 


000000G 15$: 
177777 


D1i6 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


#5,-CSP) 
PC,WALKING.BIT 
R3,(SP) 


- (SP) 
PC,WRT.STATION.ADR 
lal 


R3,Re2 
9$ 


2 

#200, -CSP) 

PC, XMIT. SETUP. PACKET 
CSP )+ 

67 

RO 

11$ 

oe 


RO 
RO, XBUF .LENGTH 
TEMP4 ,R3 


$s, -(SP) 

PC ,WALKING.BIT 
(SP) 

-(SP) 

— 


CSP) 
oe 


R 

#XMIT .BUFFER,RO 
R1,R0 

#-1,R2 


VAX-11 Bliss-16 V4.1-582 Page 1 
DISK$USER2: [MARSHALL . DEQNA]ZQNA3. BLI;4 (40) | 


; INDEX4,* 


; INDEX4,* 


$ 
; INDEX4 


; INDEX4,* 


; INDEX4,* 


INDE X4 


INDEX4 , + 


: 
INDEX4 


INDEX2 


* 
INDEX2, * 


SEQ =. 


owe 


3675 


3876 | 


3874 
3873 


3877 
3880 
3877 
3880 


3883 
3884 


3886 


3888 


3889 


3892 


3887 


3886 


3896 
3898 


. a SS LL LL 


——$—— 


: Routine Size: 
; Maximum stack 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: 
; Maximum stack 


$ 3911 
$ 3912 


004737 
104466 


006000 
103773 
000207 


1 
1 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 17 - STATION ADDRESS TEST 


000000G 
16$: 
000001 
000000G 
000005 
000003 
000000G 17$: 
000005 
203 words, Routine Base: ABSCODE$ 
depth per invocation: 11 words 
017316' Ti?7:: 
i$: 
6 words, 


depth per invocation: 


E16 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


R3 
CRO),R3 


R2,(RO) 
R2, TARGET . ADRCR2) 


#1, -CSP) 
a 
«e 


R 
TARGET . ADRCRO) 
RO 

RO, #5 

17$ 

PC 


+ 17316 


——_— —_—_— ~— 


SEQ 0199S 
VAX-11 Bliss-16 V4.1-582 Page 116! 
DISK $USER2: [MARSHALL . DEQNA)ZQNA3.BLI; (405 


T17 TEST 17 - STATION ADDRESS TEST 


PC,$T17 
66 


RO 
1$ 
PC 


Routine Base: ABSCODE$ + 20144 
2 words 


; *,*CINDEX2) 3899 | 
; 3902 | 
; INDEX2,* 

; INDEX3 3866 
; INDEX3,+* 

; INDEX2 3907 
; *CINDEX2) 3908 
; INDEX2 3907 
H INDEX2,* 

; 3772 
; 3908 


; 3899 
; 3902 
; INDEX2 3896 
| 


w 
3 
be ee he be be be be be be be be be ee be be be be be be be he be be be he be be be ee be be he be ee ee be ee he he be be be be be 


en oe 


F16 


SEQ 0200 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 1 
TEST 18 - ALL MULTICAST STATION ADDRESS TEST 14-Mer-1985 13:05:35 DISK $USER2 : (MARSHALL . DEQNA)ZQNA3.BL1;4 (41) 


sSBTTL ‘TEST 18 - ALL MULTICAST STATION ADDRESS TEST’ 
See 
’ 


TEST 18: ALL MULTICAST STATION ADDRESS TEST 


DESCRIPTION: 
This test vefifies that DEQNA recognizes ‘all multicast’ addresses of 
! 


the node and discards loopback packets with non-enabled addresses. 
If the operator specifies loop on error, the program re-executes the 
code that detected the error until tC is entered. 


Hardware tested: All Multicast Addressing 
18051 Microprocessor 
Address Filter Circuitry 


Set of ‘all multicast’ addresses: 


DEQNA Physical Addr FF -FF -FF -FF -FF -FF 
AA-00-00-00-00-00 55-55-55-55-55-55 
AA-00-02-AA-AA-AA AA-AA-AA-AA-AA-AA 
AA-00-C5-55-55-55 01-00-00-00-00-00 
AA-00-04-FF -FF -FF AB-AA-AA-AA-AA-AA 
AA-00-04-00-00-00 FF -00-01-02-03-04 
AA-00-04-18-81-18 00-F4-FA-44-44-55 


Processing: 


BEGIN 
reset device 
select internal loopback mode 
set mode to Setup 
load Station Address RAM with ‘all multicast’ addresses 
REPEAT for ‘all multicast’ addresses in and out of set 
load ‘all multicast’ address of the packet 
disable receiver 
transmit loopback packet 
enable receiver 
check for expected loopbeck status 
IF error 
THEN 
print error message if not inhibited 
ENDIF 
call compere_packets 
ENDREPEAT 
END 


—— -- i 


G16 


! 
ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 oe as B | 
v01.0 TEST 18 - ALL MULTICAST STATION ADDRESS TEST 14-Mar-1985 13:05:35 DISK$USER2: (MARSHALL . DEQNA )ZQNA3.BLI;4 a” C42) | 
: 3960 3 BGNTST; 
; 3961 3 
; 3962 3 tee 
; 3963 3 ! RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING 
: 3964 3 ! TESTS IN EXTERNAL LOOPBACK MODE. 
; 3965 3 !-- 
: 3966 3 
; 3967 3 RESET_DEQNA C( ); 
; 3968 3 PREP_FOR_SETUP ( ); 
: 3969 3 INCR INDEX1 FROM 1 TO 13 DO 
: 3970 3 WRT_STATION_ADR (€ .INDEX1, .INDEX1 ); 
$ 3971 3 WRT_STATION_ADR ( 14, PHA_INDEX ); 
$ 3972 3 
i 3973 5 BGNSUB ; 
; 3974 5 XMIT_SETUP_PACKET (€ A_MODE ); 
; 3975 3 ENDSUB ; 
; 3976 3 
; 3977 3 tee 
$ coe : NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 
: !-- 
; 3980 3 
; 3981 3 RBUF_LENGTH = 6; 
: 3982 3 XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 
8 3983 3 
: 3984 3 INCR INDEX FROM 6 TO 19 DO 
; 3985 4 BEGIN 
$ 3986 4 WRT_STATION_ADR (€ ZERO, .INDEX ); 
; 3987 4 
$ 3988 6 BGNSUB ; 
; 3989 6 XMIT_ILOOP_PACKET (€ ZERO ); 
; 3990 4 ENDSUB ; 
; 3991 4 
; 3992 4 INCR INDEX2 FROM O TO 5 DO 
; 3993 5 BEGIN 
3 3994 5 XMIT_BUFFER [ .INDEX2 ]) = ( -.XMIT_BUFFER [ .INDEX2 ] ) - 1; 
; 3995 5 TARGET_ADR [{ .INDEX2 ]) = .XMIT_BUFFER [ .INDEX2 ]; 
; 3996 4 ; 
; 3997 4 
3 3998 4 XMIT_BUFFER [ ZERO ) = .XMIT_BUFFER [ ZERO J] AND #0'177774'; 
; 3999 4 TARGET_ADR [ ZERO ) = .XMIT _BUFFER [ ZERO }; 
; 4000 4 
; 4001 6 BGNSUB ; 
$ 4002 6 XMIT_ILOOP_PACKET (€ ONE ); 
$ 4003 4 ENDSUB ; 
; 4004 4 
3 4005 3 END; 
; 4006 3 
: 4007 3 INCR INDEX2 FROM O TO 5 DO 
: 4008 3 TARGET_ADR ({ .INDEX2 J] = ZERO; 
; 4009 
: 


ENDTST; 


= ee lp eg. 


—_— eee ee es 


—_— —— ee 
— — ee we ee 


H16 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 ee ate 
TEST 18 - ALL MULTICAST STATION ADDRESS TEST 14-Mar-1985 13:05:35 DISK$USER2: [MARSHALL . DEQNA JZQNA3.BLI;4 (42) | 


-SBTTL $T18 TEST 18 - ALL MULTICAST STATION ADDRESS TEST 


—- _— —-— 


0000006 $718: JSR Ri, $SAVE4 3910 
0000006 JSR PC, RESET .DEQNA ; 3967 
000000G JSR PC. PREP .FOR. SETUP 5 3968 
000001 MOV #1,R1 ; *,INDEX1 3969 | 
1$: MOV R1,-CSP) ; INDEX1,* 3970 | 
MOV R1i,-CSP) ; INDEX1, « 
000000G JSR PC,WRT.STATION.ADR 
CMP (SP)+, CSP )+ 
INC Ri ; INDEX1 3969 
000015 CMP R1,#15 ; INDEX1,* 
BLE i$ 
000016 MOV #16,-(SP) ' 3971 
000023 MOV #23,-CSP) 
JSR PC,WRT.STATION.ADR 
2$: TRAP 2 
000201 MOV #201, CSP) 5 3974 
JSR af’ XMIT.SETUP .PACKET 
TRAP 
ROR 4 
BLO 2$ 
000006 000000G MOV #6 ,RBUF .LENGTH ; 3981 
000006 MOV #6 ,RO : 3982 
ASR RO 
NEG RO 
000000G MOV RO, XBUF .LENGTH 
000006 MOV #6 ,R2 ; *, INDEX 3984 
3$: CLR (SP) ; 3986 
MOV R2,-CSP) ; INDEX,* ~ 
000000G JSR PC,WRT.STATION.ADR 
4$: TRAP 2 
CLR CSP) ; 3989 
000000G JSR PC,XMIT.ILOOP.PACKET 
TRAP 67 
ROR RO 
BLO 4$ 
CLR RO 3 INDEX2 3992 
000000G 5$: MOV #XMIT .BUFFER,R1 : 3994 
ADD RO,R1 H INDEX2 »* 
177777 MOV #-1,R3 
CLR R4 
BISB CR1),R4 
SUB R4, R3 
MOVB R3,CR1) 
000000G MOVB R3, TARGET. ADRCRO) ; *,*CINDEX2) 3995 
INC RO ; INDEX2 3992 
000005 Pip -— ; INDEX2,* 
L 
000003 000000G BICB #3,XMIT.BUFFER : 3998 
000000G 000000G MOVB XMIT.BUFFER, TARGET.ADR ; 3999 
6$: TRAP 2 
000001 MOV #1, (SP) : 4002 | 
000000G JSR PC,XMIT.ILOOP.PACKET 


ee ee ee 


— - — ——_ <«-— 4 LL 


| 116 


er ee ~~ — _—— 


| SEG, 0203 | 
| ZQNAS CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 120 ! 
vo1.0 TEST 18 - ALL MULTICAST STATION ADDRESS TEST 14-Mar-1985 13:05:35 DISK$USER2: [MARSHALL . DEQNA)ZQNA3. eLI, a (as >| 
! 
000240 104467 TRAP 67 
000242 ROR RO 
000244 103770 BLO 6$ 
000246 005726 TST (SP )+ ; 3985 
000250 005202 INC R2 ; INDEX 3984 | 
000252 020227 000023 CMP R2,#23 ; INDEX,* | 
000256 003722 BLE 3$ 
000260 5000 CLR RO INDEX2 4007 
000262 105060 000000G 7$: CLRB TARGET. ADRCRO) *CINDEX2) 4008 | 
005200 INC RO INDEX2 
000270 020027 900005 CMP RO, #5 INDEX2,* 
000274 003772 BLE 7$ 
000276 022626 CMP CSP)+,CSP)+ 
000300 000207 RTS PC 
; Routine Size: 97 words, Routine Base: ABSCODE$ + 20160 
; Meximum steck depth per invocation: 10 words 
SBTTL T18 TEST 18 - ALL MULTICAST STATION ADDRESS TEST 
000000 004737 020160' T18:: 
000000 1$: JSR PC,$7T18 3 4008 
000004 104466 TRAP 66 
000006 006000 ROR RO 
000010 103773 BLO i$ 
000012 000207 RTS PC 
; Routine Size: 6 words, Routine Base: ABSCODE$ + 20462 
; Maximum stack depth per invocation: 2 words 


3 4011 1 
; 4012 1 


w e 

: . © 
oO ~“ 
eas 


ae ee ee bee bee ee be ee ee he he he ee he ee fn ee ee ee ee ee ee ee fee ee ee ee ae ee > ee he ee bee ee ee ee ee bee he bee ee ee eo 


ee ee ee ee 


J16 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 19 - RUNT PACKET TEST 


SSBTTL ‘TEST 19 - RUNT PACKET TEST’ 


See 


TEST 19: RUNT PACKET TEST 


DESCRIPTION: 
This test verifies that the DEQNA can detect runt packets in FIFO. 
If the operator specifies loop on error, the program re-executes the 
code that detected the error until tC is entered. 


Hardware tested: EPP . 
Address Filter Circuitry 


Station Address table: 


DEQNA Physical Addr 
AA-00-00-00-00-00 


Processing: 


BEGIN 
reset device 
select internal loopback mode 
load Station Address RAM with Station Addresses from table 
load packet with valid Station Address 
disable receiver 
transmit loopback packet 
enable receiver 
check for expected loopbeck status 
IF error 
THEN 
ee error message if not inhibited 


load packet with invalid Station Address 
disable receiver 
transmit loopbeck packet 
enable receiver 
check for expected loopback status 
IF error 
THEN 
print error message if not inhibited 
ENDIF 
END 


————we ee ee eee ee 


SEQ 0204 
14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 
14-Mar-1985 13:05:35 § DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BL1;4 


LL LLL LLL LLL LLL LLL OLA 


(4 


aa | 
3) 


— ——_—. ee ee ee 


K16 


— { CSR J = ZERO; 
; 


ENDTST; 


| 
i 
' ZQNA3 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 = o's 20 | 
, VO1.0 TEST 19 - RUNT PACKET TEST 14-Mar-1985 13:05:35 DISK$USER2: [MARSHALL . DEQNA )ZQNA3.B8L1I;4 (445 | 
j 
$ 4063 3 BGNTST; | 
; 4064 3 
$ 4065 3 $ee 
‘ 4066 3 ! RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING 
’ 4067 3 ! TESTS IN EXTERNAL LOOPBACK MODE. 
; 4068 3 i-- ’ 
; 4069 3 | 
; 4070 3 RESET_DEQNA ( ); 
$ 4071 3 PREP_FOR_SETUP ( ); l 
; 4072 3 INCR INDEX1 FROM 6 TO 19 DO 
$ 4073 3 WRT_STATION_ADR (€ .INDEX1 - 5, PHA_INDEX ); 
; 4074 3 
; 4075 5 GNSUB ; 
; 4076 5 XMIT_SETUP_PACKET (€ N_MODE ); 
; 4077 3 ENDSUB ; 
; 4078 3 
$ 4079 3 lee | 
$ prey : ! NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 
$ !-- 
; 4082 3 
; 4083 3 RBUF_LENGTH = 6; 
$ pene XBUF_LENGTH = - ( .RBUF_LENGTH tf -1 ); 
: 
; 4 3 WRT_STATION_ADR ( ZERO, PHA_INDEX ); 
; 4087 3 
$ 4088 5 BGNSUB ; 
$ 4089 5 XMIT_ILOOP_PACKET (€ ZERO ); 
; 4090 3 ENDSUB ; 
; 4091 3 
; 4092 5 BGNSUB ; 
; 4093 5 WRT_STATION_ADR (€ ZERO, 2 ); 
; 4094 5 | 
; 4095 5 .IOP_TABLE { CSR ) = ONE; 
$ 4096 5 
; 4097 5 SET_RDESCR_LIST (€ .XBUF_LENGTH, VE ); 
; 4098 5 .IOP_TABLE [{ RLO_ADR J] = RCV_D_LIST; 
; 4099 Z .10P_TABLE ( RHI_ADR ]) = ZERO; 
; 4100 
; 4101 5 SET_XDESCR_LIST € .XBUF_LENGTH, VE ); 
$ 4102 5 .IOP_TABLE { XLO_ADR ] = XMIT_D_LIST; 
: 4103 5 .10P_TABLE [{ XHI_ADR ] = ZERO; 
; 4104 5 
; 4105 5 CHK_RIXI_STATUS ( ZERO ); 
; 4106 5 CHK_CSR_STATUS C( CSR “STATUS, CSR_MASK ); ! 0'100220', 0'100220' 
; 4107 5 CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS ); ' 0'140000' , 0'000400' 
; 4108 : CHK_RCV_STATUS ( RFLG_STATUS, RWD16_STATUS DF ! 0'140000' , 0'044000' 
‘ 
; 5 | 
’ 3 
; 3 | 
; 1 
j 
| 


-- — ee Ee ee ee 


CZQNADO DEQNA FUNCTIONAL TEST 


TEST 19 - RUNT PACKET TEST 


000000G 
100220 


000000G 


000016G 


000004G 


000010G 


$T19: 


1$: 


2$: 


3$: 


4$: 


. SBTTL 
MOV 


L16 


14-Mer-1985 13:11:16 
14-Mar-1985 13:05:35 


ig as}. 19 - RUNT PACKET TEST 


i 
PC ,RESET.DEQNA 


PC,PREP .FOR.SETUP 


P) 
PC, WRT . STATION. ADR 


(SP)+,(SP)+ 
R 


1 
R1, #23 
1$ 


2 
#200, -CSP) 


PC ,XMIT.SETUP .PACKET 


(SP )+ 
67 
RO 


2$ 
#6 ,RBUF .LENGTH 
#6 ,RO 


RO 
“so 


-(SP 
#23, -(SP) 
” i tii sac 


(SP) 


#2,-CSP) 
PC,WRT.STATION. ADR 


CSP ) 
ro 


#1,@I0P. TABLE +16 


XBUF .LENG 


#-60000, -(SP) 
PC,SET.RDESCR.LIST 
@RCV.O.LIST,@IOP. TABLE +4 


TH, CSP) 


@IOP . TABLE +6 
XBUF .LENGTH, (SP) 
#-60000, -( SP) 


PC,SET.XDESCR.LIST 
#XMIT.DO.LIST,@IOP. TABLE+10 


@IOP.TABLE+12 
(SP) 


PC ,CHK.RIXI.STATUS 


#-77560, (SP) 
(SP),-CSP) 


—— -<<— = ——— ———_——— 


SEQ 0206 


VAX-11 Bliss-16 V4.1-582 


Page 123 
DISK$USER2: (MARSHALL .DEQNA)ZQNA3.B8L1;4 (44) 


*, INDEX1 
INDEX1,* 


INDEX1 


INDEX1, # 


| 
! 
| 
a, 
4070 
4071 | 


4072 | 
4073 | 


4072 


4073 
4076 


| 
4073 
4076 
4083 
4084 


4086 


4089 


LLL LLL LLL LLL OE ° 


s Routine Size: 
; Maximum steck 


000000 
000000 
000004 
000006 
000010 
000012 


004737 
104466 
006000 


103773 
000207 


; Routine Size: 


; Maximum stack 


; 4114 
; 4115 


1 
1 


- ee ee 


CZQNADO DEQNA FUNCTIONAL TEST 
TEST 19 - RUNT PACKET TEST 


110 words, 


020476' T19:: 
i$: 


6 words, 


SS ee iia 


Routine Base: ABSCODES 
depth per invocation: 10 words 


M16 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


PC,CHK.CSR.STATUS 
#-40000, (SP) 

#400, -CSP) 
PC,CHK.XMIT.STATUS 
#-40000 , (SP) 
#44000, -(SP) 
PC,CHK.RCV.STATUS 
@I0P . TABLE+16 

#14 ,SP 

67 

RO 


4$ 

CSP )+,CSP)-+ 
CSP )+,R1 
PC 


+ 20476 


T19 TEST 19 - RUNT PACKET TEST 


PC,$T19 
66 


Routine Base: ABSCODE$ + 21032 
depth per invocation: 2 words 


VAX-11 Bliss-16 V4.1-582 Page 
DISK $USER2: [MARSHALL . DEQNA )ZQNA3. BLI:4” (a4 


— ee 


SEQ os 


4111 


ee ee ee ee ee ce 





—— ee 


turn of 3 LED's on the module 





SEQ eens 
VAX-11 Bliss-16 V4.1-582 Pege 125 
DISK $USER2: (MARSHALL . DEQNAJZQNA3.BLI;4 (45) 


| ZQNAS CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 
vo1.0 TEST 20 - FIFO OVERFLOW TEST 14-Mer-1985 13:05:35 
; 4116 1 SSBTTL ‘TEST 20 - FIFO OVERFLOW TEST’ 

; 4117 1 § 

: 4118 1 : 

: 4119 1 ! TEST 20: FIFO OVERFLOW TEST 

: 4120 1 $ 

8 4i21 1 ! DESCRIPTION: 

$ 4122 1 : 

5 4123 1 : This test verifies that the Ethernet Protocol Processor can 
: 4124 1 s detect receive FIFO overflow condition. If the operetor specifies 
; 4125 1 H loop on error, the progrem re-executes the code that detected the 
$ aaa? : : error until tC is entered. 

5 : 

$ 4128 1 : Herdwere tested: RCV Stetus wd 1 - error summery 

$ i29 1 : FIFO overflow chit 0), 
: 4130 1 : Byte FIFO in the EDLC, 
5 4131 1 H end discerd packet (bit 12) 
; 4132 1 : Processing: 

3 4133 1 : 

5 4134 1 : BEGIN 

$ 4135 1 : reset device 

$ 4136 1 : select loopback mode 

8 4137 1 : eneble receiver ( set og bit 0) 

5 4138 1 : trensmit loopbeck packet 

8 4139 1 : transmit enother loopbeck packet 

3 4140 1 : check for expected loopback stetus 

$ 4141 1 $ IF error 

3 4142 1 : THEN 

; 4143 1 : print error message if not inhibited 

8 4144 1 : ENDIF 

$ 4145 1 : 

A 4146 1 : reset device 

; 4147 1 : transmit loopbeck packet 

: 4148 1 : trensmit eae packet 

: 4149 1 8 setup Receive Descriptor List 

; 4150 1 8 enable receiver (set CSR BIT 0) 

3 4151 1 : check for expected loopback status 

: 4152 1 ! IF error 

$ 4153 1 $ THEN 

; 4154 1 : print error message if not inhibited 

3 4155 1 : ENDIF 

: 1 : 

$ 1 : 

’ 1 : 


AAA AMAA AA AAA AAA U8 Ot 8 UI OI BOO & B & Ul Ut UI Ut Ul Ut UF Ul OF Ut UT UT Ut Od Ut U8 Gt OF U8 Ut Ut Gt UF 


eee Oe ere ee ee re ee 


DEQNA FUNCTIONAL TEST 


CZQNADO 
TEST 20 - FIFO OVERFLOW TEST 
BGNTST; 


Ci 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM 


RESET_DEQNA ( 


DO 
WRT_STATION_ADR € .INDEX1, PHA_INDEX ); 


BGNSUB ; 
XMIT_SETUP_PACKET ( P_MODE ); 


WERE RECEIVED PROPERLY, SHOULD TRANSMIT AND RECEIVE PROPERLY. 


RBUF _LENGTH = 
XBUF_LENGTH = - ve -RBUF_LENGTH ft -1 ); 


INCR INDEX FROM 2 TO 3 DO 


BEGIN 
WRT_STATION_ADR (€ ZERO, .INDEX ); 


BGNSUB ; 
XMIT_ILOOP_PACKET ( ZERO ); 
ENDSUB ; 


ee eee eee ee —_—— 


SEQ 0209 


VAX-11 Bliss-16 V4.1-582 Page 126! 


DISK$USER2: [MARSHALL . DEQNA)ZQNA3. BLI;4" (46) 


LOOPBACK 2 6-BYTE PACKETS IN INTERNAL LOOPBACK MODE CHECK IF PACKETS 


FORCE RECEIVE FIFO OVERFLOW ( RCV STATUS WD 1 - BIT O ) BY TRANSMITTING 


_& ND 6-BYTE PACKET IN INTERNAL LOOPBACK MODE BEFORE RECEIVING FIRST PACKET 


BGNSUB ; 
-IOP_TABLE [{ CSR ] = ZERO; 


WRT_STATION_ADR (€ ZERO, 2 ); 


SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
.I0P_TABLE [ XLO_ADR } = XMIT_ D LIST; 
-IOP_TABLE [ XHI_ADR } = ZERO; 


CHK _RIXI_STATUS (€ ONE ); 
WRT_STATION_ADR ( ZERO, 3 ); 


SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
-IOP_TABLE { XLO_ADR ] = XMIT_D_LIST; 
-IOP_TABLE [{ XHI_ADR J) = ZERO; 





—_ 2 ——————— —— —— — —_————— ee ee ee ee ee ee -_— — —_—_—_— _ ~ 


Di 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


SEQ 02 
VAX-11 Bliss-16 V4.1-582 P e127 
) 


DEQNA FUNCTIONAL TEST age 
DISK$USER2: (MARSHALL .DEQNAJZQNA3.BL1;4 (46 


CZQNADO 

TEST 20 - FIFO OVERFLOW TEST 
SET_RDESCR LIST ( .XBUF_LENGTH, VE ); 
-IOP_TABLE { RLO_ADR } = RCV_D_LIST; 
.IOP_TABLE { RHI_ADR ] = ZERO; 
-IOP_TABLE [ CSR ] = ONE; 


$ € ZERO ); 
oe oe : CSR_STATUS, CSR_MASK 
¢ 


RFLG_STATUS, RWDIS_STATUS ); 


00220’, 0'100220' 
40000’, 0'000001’ 


FPAWLUAUUUUVVUUUUUUUUUU 





-IOP_TABLE { CSR ] = ZERO; 
SUB 


; 
RESET_DEQNA ( ); 


); !'o'l | 
XFLG_STATUS, XWD12_STATUS );  0' 140000", 0’ 000400" 
? ’ 
TURN_OFF_LED € N_MODE ); 
TURN_OFF _ “LED ( LED1 ); 
TURN_OFF_LED ( LED2 ); 
TURN_ OFF_LED (€ LEDS ); 
ENDTST; 
-SBTTL $T20 TEST 20 - FIFO OVERFLOW TEST 
010146 $720: MOV Ri, - ) : 4113 
004737 0000006 JSR PC RESET .DEQNA 4165 
004737 000000G JSR PC PREP .FOR. SETUP ; 4166 
012701 000001 MOV #1,R1 ; *,INDEX1 4167 
010146 i$: MOV R1,-CSP) ; INDEX1,* 4168 
012746 000023 MOV #23,-(SP) 
004737 JSR PC,WRT.STATION.ADR 
022626 CMP CSP)+,CSP)- 
005201 INC Ri ; INDEX1 4167 
020127 000016 CMP R1,#16 ; INDEX1,* 
003766 BLE i$ 
104402 2$: TRAP 2 ; 4168 
012746 000202 MOV #202 ,-CSP) : 4171 
7 000000G JSR PC, XMIT.SETUP .PACKET 
005726 TST CSP) : 4168 
104467 TRAP 67 ; 4171 
000 ROR RO 
103767 BLO 2$ 
012737 000006 000000G MOV #6,RBUF .LENGTH : 4179 
012700 000006 MOV #6 ,,RO : 4180 
ASR RO 
005400 NEG RO 
010037 MOV RO, XBUF .LENGTH 
012701 000002 MOV R1 ; *, INDEX 4182 
3$: CLR -C€SP) ; 4184 
010146 MOV R1,-CSP) ; INDEX, 
004737 0000006 JSR PC,WRT.STATION. ADR | 
104402 4$: TRAP 2 | 





——— eee 


CZ 


000000G 


000000G 
000200 


QNADO DEQGNA FUNCTIONAL TEST 
TEST 20 - FIFO OVERFLOW TEST 


000010G 


000010G 


5$: 


CLR 


MOV 


El 


14-Mer-1985 13:11:16 
14-Mar-1985 13:05:35 


CSP) 
en Paes 


RO 

4$ 
CSP)+,CSP)+ 
Ri 

R1, 83 

3$ 

2 
@IOP . TABLE+16 
-CSP) 
#2,-CSP) 


PC,WRT.STATION.ADR 
XBUF .LENGTH, (SP) 


Ist 
@XMIT.0. LIST, @I0P. TABLE+10 
SIOP.TABLE+12 
#1,(SP) 
PC,CHK .RIXI.STATUS 
CSP) 


#3, -(SP) 
PC,WRT.STATION. ADR 

XBUF .LENGTH, (SP) 
#-60000 , -( SP) 

PC, SET. XDESCR .L 
@xXMIT.O.LIST, aror. TABLE +10 
SIOP . TABLE+12 

XBUF .LENGTH, (SP) 
#-60000, -(SP) 

PC,SET. RDESCR. LIST 
@RCV.D.LIST,@IOP. TABLE+4 
SIOP . TABLE +6 
ae 


CSP 

PC CHK .RIXI.STATUS 
#-77560, (SP) 
CSP),-CSP) 

PC ,CHK .CSR. STATUS 
#-40000, (SP) 
#400, - CSP) 

PC, CHK .XMIT.STATUS 
#-40000 , (SP) 
#1,-CSP) 

PC, CHK .RCV.STATUS 
@IOP . TABLE +16 

#22 ,SP 

67 

RO 


S$ 
PC ,RESET .DEQNA 
#200, -(SP) 


VAX-11 Bliss-16 V4.1-582 Page 12 
DISK$USER2: (MARSHALL .DEQNA)JZQNA3.BL1;4 (46) | 


; 
; INDEX 


3 INDEX, * 


SEQ@ 0211 


4187 
4183 |! 
4182 


4189 
4197 
4199 


4201 


4210 
4212 


4213 


4218 
4219 


4220 
4221 


4223 
4189 
4223 


4226 
4228 


ee ee 


; Routine Size: 
; Maximum steck 


000000 004737 
000000 

000004 104466 
000006 006000 
000010 103773 
000012 000207 


+ Routine Size: 
; Meximum stack 


: 4234 1 


CZ 


154 words, 
depth per invocation: 


021046’ 


6 words, 
depth per invocation: 


QNADO DEQNA FUNCTIONAL TEST 
TEST 20 - FIFO OVERFLOW TEST 


Routine Base: ABSCODES 
11 words 


Pa 


14-Mer-1985 13:11:16 
14-Mar-1985 13:05:35 


PC, TURN.OFF .LED 
#204 , (SP) 
PC, TURN.OFF .LED 


PC, TURN.OFF .LED 
(SP )+ 

(SP)+,R1 

PC 


+ 21046 


PC,$T20 


Routine Base: ABSCODE$ + 21532 
2 words 


T20 TEST 20 - FIFO OVERFLOW TEST 
; 4231 
66 
| 


—— ee ee - eee ee ee “ “7 


SEQ ane 400 
VAX-11 Bliss-16 V4.1-582 
DISK$USER2: [MARSHALL . DEQNA JZQNA3. eLr,a" (46) 


; 4229 
; 4230 | 
: pa, 
; 4113 


— i a a ee 


Gi 


' 

QNA3 CZQNADO DEQGNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 -— 
01.0 TEST 21 - SANITY TIMER TEST 14-Mar-1985 13:05:35 DISK $USER2 : [MARSHALL . DEQNA)ZQNA3.BL1I;4 (47) | 

4235 1 SSBTTL ‘TEST 21 - SANITY TIMER TEST’ 

4236 1 +? 

4237 1 : 

4238 1 ! TEST 21: SANITY TIMER TEST 

4239 1 g 

4240 1 ! DESCRIPTION: 

4241 1 $ | 

4242 1 ! This test verifies that the Sanity Timer times out after a pre-set 

4243 1 : ( supplied by the operator ) timeout period. The Sanity Timer uses 

4244 1 : DCOK line on the Q-Bus to force the power_fail interrupt of the 

Peg : ; processor which in turn causes the processor to reboot itself. 

4247 1 ; Herdware tested: Sanity Timer Logic 

4246 1 $ 

4249 1 : Processing: 

4250 1 ! 

4251 1 ! BEGIN 

4252 1 ! reset device 

4253 1 ! store Console Terminal and Power_fail interrupt vectors 

4254 1 ! € location 24 and 60 octal ) 

4255 1 ! enable Console Terminal interrupt 

4256 1 ! arm for Power_fail interrupt 

4257 1 : inform the operator about the test procedure 

4258 1 : set the Senity Timer to timeout value supplied by the 

4259 1 ! operator 

4260 1 : enable the Senity Timer 

4261 :1 : weit 

4262 1 ! IF Power-fail interrupt occured 

42635 i : THEN 

4264 i ' print ‘SANITY TIMER TIMED OUT AS EXPECTED’ 

4265 1 : SE 

4266 1 } force Console Terminal input interrupt by typing "Q" 

4267 1 : print error message if not inhibited 

4268 1 : IF 

4269 1 : disable Sanity Timer 

4270 1 ! restore Console Terminal and Power_fail interrupt vectors 

4271 1 ! € location 24 and 60 octel ) 

4272 1 : END 

4273 1 !-- 


> 
g 
PANS A AIS AAIINORIINARMRITIMAMMAAMHSSHSSHSSSS&AHSHadSHaaaRaUUL 


-_ oa au - ——— Te 


Hi 


— ~~ ee eee _-—_— 


SE@ 0214 


DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 


CZQNADO Page 
TEST 21 - SANITY TIMER TEST 14-Mar-1985 13:05:35  DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BLI;4 (48 


BGNTST; 
IF .SWP_TIMER 
THEN 
BEGIN 


RESET DEQGNA AND INITIALIZE ETHERNET STATION ADDRESS RAM 


meeet DEQNA ( ); 
xt SETUP FOR POWER FAIL AND CONSOLE TERMINAL INTERRUPTS 


SETVEC € PF_VEC_LOC, PWR_INT, PRIO7 ); ! POWER FAIL 
SETVEC ( KB_VEC_LOC, KBD_INT, PRIOS ); ! CONSOLE TERMINAL 
SETPRI (€ PRIOO ); ! SET PROCESSOR PRI LEVEL 


DO 
WRT_STATION_ADR (€ .INDEX1, PHA_INDEX ); 


PUT_BIT { CSR, SE, EENABLE ); 
XMIT_SETUP_PACKET ( #0'200' + ( .SWP_TOUT_VAL t 4 ) ); 


SELECTONE .SWP_TOUT_VAL OF 
SET 


f 0,1 }: 
BEGIN 


TEMP1 = 1; 
PRINTB (€ MSG32, .TEMP1 ); 
END; 
{2 ]: 


BEGIN 

TEMP1 = 4; 

PRINTB € MSG32, .TEMP1 ); 
END; 


BEGIN 

TEMP1 = 16; 

PRINTB (€ MSG32, .TEMP1 ); 
END; 


ES de 


{C 4 ]: 


TEMP1 = 1; 
PRINTS ( MSGSS, .TEMP1 ); 


BEGIN 


TEMP1 = 4; 
PRINTB ( MSGSS, .TEMP1 ); 
END; 


{ SJ} 


—_——_—— 


131 
8) 


A TT 


a. 


SEQ 0215, . 
f 





! 
| ZQNA3 CZQNADO DEGNA FUNCTIONAL TFST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Page 
|} V01.0 TEST 21 - SANITY TIMER TEST 14-Mar-1985 13:55:35 DISK$USER2: : (MARSHALL . DEQNA )ZQNA3. BLI:4” cas 
; 4327 6 { 6 }: 
5 4328 7 BEGIN 
i 4329 7 TEMP1 = 16; 
| 4330 7 PRINTB ( MSGSS, .TEMP1 ); 
; 4331 6 END; : 
j 4332 6 {71}: ' 
5 4333 7 BEGIN 
j 4334 7 TEMP1 = i; 
; 4335 7 PRINTB ( MSGS6, .TEMP1i ); 
$ 4336 6 END; 
| 4337 6 TES; 
' 4338 6 
$ 4339 6 PRINTB ( MSGS7 ); 
$ 4340 6 INTERRUPT_FLG = -1; 
$ 4341 6 WAIT_FOR_TIMEOUT ( ); 
; 4342 6 
' 4343 6 See 
' 4344 6 ! PUT DEQNA IN NORMAL MODE AND CHECK STATUS 
; 4345 6 $-- 
; 4346 6 
; 4347 6 PUT_BIT ({ CSR, SE, DISABLE ); 
i 4348 6 PREP _FOR_SETUP (¢ ); 
‘ 4349 6 INCR INDEX1 FROM 1 TO 14 DO 
5 4350 6 WRT_STATION_ADR € .INDEX1, PHA_INDEX ); 
; 4351 6 
$ 4352 8 BGNSEG; 
H 4353 8 XMIT_SETUP_PACKET (€ N_MODE ); 
; 4354 6 ENDSEG; 
; 4355 6 
' 4356 6 CLRVEC ( PF_VEC_LOC ); 
' 4357 6 CLRVEC (€ KB_VEC_LOC ); 
; 4358 6 
' 4359 6 IF .INTERRUPT_FLG 
' 4360 6 THEN 
‘ 4361 7 BEGIN 
' 4362 8 PRINTB ( MSG33 ) 
; 4363 7 END 
: 4364 6 ELSE 
' 4365 7 BEGIN 
' 4366 7 CSR_WORD = GET_BIT ( CSR_ALL ); 
: 4367 7 PRINTB ( MSG59 ); 
' 4368 7 PRINTB ( MSG34 ); 
; 4369 7 ERRDF (C 2101, MSGOO, ERROR$REPORT ); 
; 4370 6 END; 
’ 4371 4 ENDSUB ; 
; 4372 3 END; 
: 4373 3 
' 4374 1 ENDTST; 
-SBTTL $T21 TEST 21 - SANITY TIMER TEST 
010146 $721: MOV R1,-(SP) ; 4233 
2 005746 TST -(SP) 


—_ SP ee ee ce 





032737 
002 


CZQNADO DEQGNA FUNCTIONAL TEST 
TEST 21 - SANITY TIMER TEST 


000001 000000G 


022546’ 
1$: 


2$: 


3$: 
000016 


000000G 


000002 4$: 


Jl 


14-Mar-1985 13:11:16 
14-Mar-1985 13:05:35 


#1,SWP. TIMER 
1$ 


17$ 

PC ,RESET .DEQNA 
#PRIO7,-CSP) 
#PWR INT, -CSP) 
#24 ,-CSP) 
#3,-CSP) 

37 


#PRIOS, (SP) 
#KBD.INT,-CSP) 
#60, -(SP) 

#3, -CSP) 


37 

#PRIOO,RO 

41 

PC,PREP .FOR.SETUP 
fg 


) 
PC,WRT.STATION. ADR 
oer 


1 
R1,#16 
2$ 


2 

REG.ADR,RO 

#2000, 16(RO) 

SWP .TOUT.VAL ,RO 
#4,RO 

RO, (SP) 

#200, CSP) 

PC, XMIT .SETUP .PACKET 
> ic lla ti 


Ri, #1 
4s 


LL me 


SEQ eis, .| 
VAX-11 Bliss-16 V4.1-582 
DISK $USER2: [MARSHALL . DEQNA)ZQNA3. Bir. a cae) | 


3 4276 

; 4284 

; 4269 | 
| 

3 _— 

; x 

; 4292 

; *,INDEX1 4293 

; INDEX1,* 4294 

; INDEX1 4293 

; INDEX1,* 

; 4294 

j 4297 

: 4298 

; 4300 

; 4302 

; 4304 

; 4305 

; SP,* 

P 4303 

; 4307 

: 4309 

; 4310 | 

; SP, | 
; 

4308 | 


- —_—— —_ i ee 


K1 ia | 


SEQ 0217 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 a 134. 
TEST 21 - SANITY TIMER TEST 14-Mar-1985 13:05:35 DISK$USER2: (MARSHALL .DEQNA)ZQNA3.BLI;4 (48). 
020127 000003 S$: CMP R1,93 : a3i2| 
001014 BNE $ 
012737 000020 0000006 MOV 220, TEMP1 ; 4314) 
012716 000020 MOV #20,(SP) ; 4315: 
012746 000000G MOV 32,-(SP) 
012746 000002 MOV #2,- | 
010600 MOV SP ,RO ; SP,« 
104414 TRAP 
000473 BR 10$ : 4313 | 
020127 000004 6$: CMP R1, 44 : 4317 | 
001014 BNE 7$ 
012737 000001 0000006 MOV #1, TEMP1 ; 4319 | 
012716 000001 MOV » CSP) ; 4320 ' 
012746 MOV #MSG55, -(SP) | 
012746 000002 MOV #2,-(S 
010600 MOV SP ,RO ; SP,« 
104414 TRAP 14 
000454 BR 10$ ; 4318 
020127 000005 7$: CMP R1,#5 ; 4322 
001014 BNE 
012737 000004 000000G MOV #4, TEMP1 ; 4324 
012716 000004 MOV #4,(SP) : 4325 
012746 000000G MOV #MSG55, -(SP) 
012746 000002 MOV #2,-(SP 
010600 MOV SP ,RO ; SP,« 
104414 TRAP 14 
000435 BR 10$ ; 4323 
020127 000006 8$: CMP R1,#6 ; 4327 
001014 BNE 9$ 
012737 0000 0000006 MOV #20, TEMP1 ; 4329 
012716 000020 MOV #20, (SP) ; 4330 
012746 00 MOV #MSG55, -(SP) 
012746 000002 MOV #2,-(SP) , 
010600 MOV SP RO ; SP,« 
104414 TRAP 14 
000416 BR 10 ; 4328 
020127 000007 9: cMP R1,#7 ; 4332 
001014 BNE 11 
012737 000001 0000006 MOV #1, TEMP1 ; 4334 
012716 000001 MOV #1,(SP) ; 4335 
012746 000000G MOV #MSG56, -(SP) 
012746 000002 MOV #2,-(SP) 
00 MOV SP ,RO ; SP,«* 
104414 TRAP 4 
022626 10$: CMP (SP)+,(SP)- ; 4333 
012716 0000006 11$: MOV #MSG57, (SP) : 4339 
012746 000001 MOV #1,-CSP) 
104414 TRAP 14 
012737 177777 0000006 MOV #-1, INTERRUPT .FLG ; 4340 
004737 0000006 JSR PC, WAIT.FOR. TIMEOUT : 434) | 
013700 0000006 MOV REG. ADR,RO : 4347 | 
042760 002000 000016 BIC #2000, 16(RO) | 





—_—_—  —_—- _——— ee eS _*- ~— — ~ 


il 


SEQ 0218 
CZQGNADO DEQGNA FUNCTIONAL TEST 14-Mar-1985 13:11:16 VAX-11 Bliss-16 V4.1-582 Pam 135 
TEST 21 - SANITY TIMER TEST 14-Mer-1985 13:05:35 DISKSUSER2: : (MARSHALL . DEQNA)ZQNAS.BLI;4 (48) 
000000G JSR PC,PREP .FOR.SETUP 3 4348 | 
000001 MOV #1,R1 ; *, INDEX] 4349 | 
12$: MOY R1.CSP) ; INDEX1,« 4350 
000023 MOV #23.,-(SP) 
000000G JSR PC ..WRT .STATION.ADR 
TST (SP )- 
INC Ri ; INDEX 4349 | 
000016 CMP R1,216 ; INDEX1,« 
BLE 3 
13%: TRAP 4 ; 4350 | 
000200 MOV $200,(SP H 4353 | 
000000G JSR PC, XMIT. SETUP .PACKET 
TRAP 70 | 
ROR RO | 
BLO 13$ 
000024 MOV #24 ,RO ; 4356 
TRAP 
000060 MOV $60 ,RO : 4357 
TRAP 36 
000001 000000G a #1, INTERRUPT .FLG ; +359 
MOV @MSG33,(SP) $ 4362 
MOV SP RO 3 SP, 
TRAP 4a 
BR 15$ ; 4359 
000000G 14%: MOV REG.ADR.,.RO : 4366 
000016 9000020 MOV 16(RO),20(SP) ; *, TMP. LOCATION 
000020 000000G MOV 20(SP),CSR.WORD ; TMP .LOCATION, « 
000000G MOV @MSGS9,(SP) : 4367 
000001 MOV 61,-(SP) 
MOV * > SP, ak 
TRAP 
MOV OMSG34 ,( SP) F 4368 
000001 MOV #1,-(SP) 
MOV SP RO ; SP, 
TRAP is 
TRAP 55 : 4369 
-WORD 4065 
. WORD 
. WORD ERROR SREPORT 
TST (SP )- : 4365 
15$: CMP (SP )-,(CSP)- ; 4294 
TRAP 67 3 4370 
ROR RO 
= | 
021700' JMP 3$ 
000016 163: ADD #16,SP 3 4278 
17$: TST (SP)- : 4233 
MOV CSP )-,R1 
RTS PC 





r 000207 
1: Routine Size: 


259 words, 


Routine Base: ABSCODES - 21546 


——— 


ZQNA3 CZQGNADO DEQGNA FUNCTIONAL TEST 14-Mer-1985 1 
vo1.0 TEST 21 - SANITY TIMER TEST 14-Mer-1985 1 


; Maximum stect depth per invocetion: 14 words 


,000000 004737 021546’ T21:: 
, 000000 1s: JSR PC.$T21 
000004 104466 TRAP &E 
000006 006000 ROR RO 
000010 103773 BLO i$ 
000012 000207 RTS PC 
; Routine Size: 6 words, Routine Bese: ABSCODES - 22554 
s; Meximm steck depth per invocetion: 2 words 
; 4375 1 
; 4377 Oo ELUDOr 
5 OTS external referenc 
.GLOBL SSAVES, $SAVE3, $SAVE2 
P PSECT SUMMARY 
j 
j Psect Neme Words Attributes 
; AB SCODE $ 4796 :,. FT. ck, Oa. Cor 


Library Stetistics 


a _ ee ee ee eee 
& 
ber 
ns 
— 
m 
& 


i 

Ee I es ae RM DION ares Symbols -------- Pages 
j File Totel Loeded Percent Mapped 
i 

s DOISKSUSER2: [MARSHALL .DEQNA )JQNALIB.L16;15 

i 223 142 63 14 
' 

: COMMAND QUALIFIERS 

: BL. ISS/PDP1)1 ZQNAS.BLI/LIST=ZQNA3.LIS/OBJECT=ZQNA3. OBU/ SOURCE =PAGE :53 


—_——-- — ~_—- ee 


SEQ nna 


VAX-11 Bliss-16 V4.1-582 


DISK $USER2: [MARSHALL . DEQNA)ZQNA3. eui.s 


Processing 
Time 


00:00.1 


136 
(48) 


4372 


_ * TT —_——- 


Ni 


ZQNAS CZQGNADO DEGNA FUNCTIONAL TEST 14-Mer-1985 13:11:16 
v01.0 TEST 21 - SAMITY TIMER TEST 


Size: 4796 code - © dete words 
Aun Time: 01:59.9 
Elepsed Time: 07:33.3 


Lexemes/CPU-M; , i wn 
Memory Vsed: peges 
Compiletion Complete 


$ 
5 

a 
s Lines/CPU Hin: 2190 
$ 
5 
$ 


VAX-11 Bliss-16 V4.1-582 


| CEE pea mrss ere - 
- ee 


——_—— eee = ee 


: 


oe @f © @ @f Ge oF es oe es os oe 
~ 





— —— ae ee ee ee ree ee 


CZQNADO DEQNA FUNCTIONAL TEST 


vo1.0', 
ADDRESSING _MODE( ABSOLUTE ) 


I= 
SSBTTL ‘GLOBAL ROUTINE DECLARATION MODULE’ 
BEGIN 
LIBRARY ‘QNALIB’ ; 


REQUIRE ‘BLSMAC.REQ' ; 
! <BLF /NOF ORMAT > 


hha eed 1-1-1 -1-1-) 





Be 


14-Mer-1985 13:18:55 
14-Mer-1985 13:06:01 


MODULE ZQNA4 ag! * CZQNADO DEQNA FUNCTIONAL TEST’ 


! QNALIB LIBRARY 


—_—-—_———__——— 


SE 
VAX-11 Blises-16 V4.1-582 oy 1 
DISK$USER2: (MARSHALL .DEQNA)ZQNA4.BLI;4 (1) 


! DIAGNOSTIC SUPERVISOR LIBRARY 


——_ ——— ee 


ner rn ee ERE | ESTES OOS EES EI ee ee ey CER eS emt rn 


en et ll “erratic: iti. i, tua a — —— . — 


Ce 


— me ee | —_— ee ee 7 


SEQ 02 

ZQNA4 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 — 2 | 

vo1.0 GLOBAL ROUTINE DECLARATION MODULE 14-Mar-1985 13:06:01 DISK$USER2: [MARSHALL . DEQNAJZQNA4.BLI;4 (2)/ 

: isc2 1 PSECT 

; 1503 1 CODE = ACSCODES; 

: 1504 1 

’ i505 1 FORWARD ROUTINE 

$ 1506 1 XMIT_AND_RCV_PACKET : NOVALUE; 

$ 1507 1 

3 i508 1 See 

3 1509 1 : EXTERNAL DATA USED BY THIS MODULE 

$ 1510 1 !-- 

: i511 1 

: i5i2 1 EXTERNAL 

: 3333 3 

; 1514 1 See 

s 1515 1 : COMMUNICATION AREA DECLARATIONS 

: 1516 1 $-- 

3 1517 1 

; i518 1 RCV_D_LIST : BLOCK [{ D_SIZE, WORD ) FIELD ( DL_FIELDS ), 

5 i519 1 XMIT_D_LIST BLOCK [ D_SIZE, WORD ]) FIELD ( OL_FIELDS ), 

$ i520 1 DE LIST BLOCK {[{ DESCR_SIZE, WORD) FIELD ( DL _FIELDS ), 

F i521 1 RCV_BUFFER : VECTOR { B_SIZE, BYTE }, 

8 1S22 1 XMIT_BUFFER VECTOR { B_SIZE, BYTE }, 

: 1523 1 DATA_BUFFER : VECTOR ({ BUF_SIZE, BYTE ]}, 

$ 1524 1 SETUP_BUFFER : VECTOR { SETUB_SIZE, WORD }, 

3 i525 1 IOP_TABLE : VECTOR { 8, WORD ), 

3 1526 1 PROM_DESCR : VECTOR { 8D_D _SIZE, WORD ], 

3 1527 1 STATION_ADR VECTOR [ 4, 

8 1528 1 TARGET_ADR VECTOR { T_SIZE, BYTE Be 

3 is29 1 PHYS_ADR : VECTOR [{ 22, BYTE }, 

s 1530 1 

$ 1531 1 See 

; po : : HARDWARE AND SOFTWARE P-TABLE STORAGE DECLARATIONS 

; 1 $.-- 

s 1534 1 

5 1535 1 HWP_ TABLE : REF BLOCK ( HWP_SIZE, WORD ) FIELD ( HWP_FIELDS ). 

; — : SWP_ TABLE : REF BLOCK [ SWP_SIZE, WORD ] FIELD ( SWP_FIELDS ), 

$ 

3 i538 1 REG_ADR : REF REG_STR FIELD ( IOP_FIELDS ), 

$ 1539 1 GET_ADR : REF ADR_STR FIELD ( IOP_FIELDS ), 

3 1540 1 IOP_DATA REF REG_STR FIELD € IOP_FIELDS ), 

$ i541 1 
| 
| 
j 
| 


be ee ee ee he ee ee be be he be be be ee ee ee ee ee he ee ee he he ee ee he ee he be ee be 


EE ee TT ee ee ——_— —- ~ By 





—_ Ce eee ee 


De 


SEQ 022 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 Vv4.1-582 — 3! 
GLOBAL ROUTINE DECLARATION MODULE 14-Mar-1985 13:06:01 DISK$USER2: (MARSHALL .DEQNAJZQNA4.BLI;:4 (3)! 
tee 
' MISCELLANEOUS DATA DECLARATIONS 
ce 
XBUF_LENGTH, RBUF_LENGTH, | INTERRUPT_FLG, COUNTER, 
SWP_BLOCK_MEM, SWP_TOUT_VAL, SWP_ILOOP, SWP_TIMER, 
UP_COUNTER, DOWN_COUNTER, CHECKSUM, ERR_NUMBER, 
ERR_COUNT # CSR_WORD 
PRIO1, PRIO2, PRIO3, PRIO4, 
PRIOS, PRIO6, PRIO7, DEQNA_NO : WORD, 
See 
! TEMPORARY STORAGE DATA DECLARATIONS 
See 
Pl, P2, P3, P4, 
TMP_IOP_ADR, TMP_REG_DATA,  TEMP1, TEMP2, 
TEMP3, TEMP4, TEMPS, TEMP6, 
TEMP7, TEMPS, TEMPS, TAOR1, 
TADR2 : WORD, 
TBYTE1, TBYTE2, TBYTES, TBYTES =: BYTE, 
fee 
: DIAGNOSTIC ERROR MESSAGES DECLARED EXTERNALLY 
Son 
MSGOO, 
MSGO1, MSGO2, MSGO3, MSGO4, MSGOS, MSGO6, MSGO7, MSGO8, MSGO9, MSG10, 
MSG11, MSGi2, MSG13, MSG14, MSGiS, MSG16, MSG17, MSG18, MSG19, MSG20 
MSG21, MSG22, . MSG25, MS MSG27, MSG29, MSG30, 


MSG23, MSG2 . ’ MSG28, 

MSG31, MSG32, MSG33, MSG34, MSG35, MSG36, MSG37, MSG38, MSG39, MSG40, 
MSG41, MSG42, MSG43, MSG44, MSG4S, MSG46, MSG4 MSG 
MSG51, MSGS2, MSG53, MSG54, MSG5S5, MSGS6, MSG57, MSGS8, MSGS5S9, MSG60, 


‘ 
ee ee 


CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - ERRORSREPORT ( ) 


<N 
< 
~~ 
°o 


> 
> 


rr ee eee 


GLOBAL ROUTINE : ERROR SREPORT 
OESCRIPTION: 


oF © ©e Ge GF Ge ee oF ee OF es es es os os 
g 
uw 

be? be be be be be be be be be be fe ee pe 


BGNMSG CERRORSREPORT); 





SSBTTL ‘GLOBAL ROUTINE - ERRORSREPORT ( )' 


SSBTTL ‘GLOBAL ROUTINE - ERRORSREPORT ( )' 


ce 


14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-Sa2 
14-Mar-1985 13:06:01 DISK $USER2: [MARSHALL . DEQNA )ZQNA4. BL1;4° (4) 


SEQ 0224 
Page 


This routine reports errors to the operator 


/VO1. 
AMA 


RCV.D.LIST, XMIT.D.LIST, DESCR.LIST 
RCV.BUFFER, XMIT.BUFFER, a oa . BUFFER 


GET.ADR, IOP.DATA, XBUF .LENGTH 

RBUF .LENGTH, INTERRUPT. FLG, COUNTER 
SWP.BLOCK.MEM, SWP.TOUT.VAL, SWP.ILOOP 
SWP.TIMER, UP.COUNTER, DOWN. COUNTER 
CHECKSUM Cc 


MP. IOP. ADR, TMP.REG.DATA, TEMP1 
TEMP2. TEMPS, TEMP4, TEMPS, TEMP6 
TEMP7, TEMPS, TEMP9, TADR1, TADR2 
TBYTE1, TBYTE2, TBYTES, TBYTES 
MSGOO, MSGO MSGO3 


a! 

| 

| 

ZQNAG CZQNADO DEQNA FUNCTIONAL TEST 
SG60 
MSG65, MSG66, MSG67, MSG68, MSG69 | 
| 


——— ee ee 


000004 
000006 


; Routine Size: 
; Meximum stack 


Waa 
ry. 
MMM MMP hl ft 


004737 
104423 
000207 


04414 
013716 


etl i ee 





ee ee el emma cae ma a te ca 


Fe 


14-Mar-1985 13:18:55 
14-Mar-1985 13:06:01 


SEQ 0 
VAX-11 Bliss-16 V4.1-582 P ~y 5 
) 


CZQ@NADO DEQNA FUNCTIONAL TEST age 
DISK $USER2 : [MARSHALL . DEQNA)ZQNA4.BLI;4 


GLOBAL ROUTINE - ERRORSREPORT ( ) 


! 
| 
ar a ROUTINE - ERRORSREPORT ( ) 


. SBTTL 
-PSECT ACSCODES, 
O00000V ERRORSREPORT : 
JSR PC ,MSERRORSREPORT | 1592 
TRAP 23 
RTS PC 
4 words, Routine Base: ACSCODE$ + 0000 
depth per invocation: 2 words 
PRINTB (€ MSGOS ); 
PRINTB € MSGO4, .XMIT_D_LIST { FLGWD ), .RCV_D_LIST [{ FLGWD } ); 
PRINTS ( MSGOS, .XMIT_D_LIST [{ DBITS J), .RCV_D_LIST [{ DBITS } ); 
PRINTB € MSGO6, .XMIT_D_LIST ({ LOADR J], .RCV_D_LIST [{ LOADR } ); 
PRINTB € MSGO7, .XMIT_O_LIST { TWOL J, .RCV_D_LIST { TWOL ] ); 
PRINTB (€ MSGO8S, .XMIT_D_LIST { STWD1 ] AND XWD1_MASK, .RCV_D_LIST ( STWD1 ) AND RWD2_MASK ); 
PRINTB ( MSGO9, .XMIT_D_LIST ({ STWD2 ] AND XWD2_MASK, .RCV_D_LIST ({ STWD2 ] AND RLL_MASK ); 
PRINTB € MSG10, .CSR_WORD AND #0'133777' ); 
PRINTB (€ MSG11, .HWP_TABLE [ ADDR )} ); 
ENDMSG; 
-SBTTL MSERRORSREPORT GLOBAL ROUTINE - ERRORSREPORT ( ) 
000000G MSERRORSREPORT : 
MOV #MSGO3,-CSP) F 1594 
000001 MOV $1,-CSP) 
MOV SP ,RO ; SP,* 
TRAP 14 
000000G MOV RCV .D.LIST,CSP) ; 1595 
000000G MOV XMIT.O.LIST,-(SP) 
000000G MOV @MSG04 , -( SP) 
000003 MOV #3,-CSP) 
MOV SP ,RO 3 SP ,* 
TRAP 14 
000002G MOV RCV .O.LIST+«2,(SP) : 1596 
000002G MOV XMIT.O.LIST+2,-CSP) 
000000G MOV #MSGO5, -( SP) 
000003 MOV #3,-(SP) 
MOV SP ,RO i SP ,* 
TRAP 14 
000004G MOV RCV.D0.LIST+4, (SP) 3 1597 
000004G MOV XMIT.D.LIST+4, -CSP) 
000000G MOV #MSG06 , -( SP) 
000003 MOV #3,-CSP) 
MOV SP ,RO ; SP,* 
TRAP 14 | 
0000066 MOV RCV.D.LIST+6, (SP) : 1596 


‘ 
oe 


ow ane <> eee < ——_ ——e «Dp ~ 





SEQ 0226 


; Meximum steck depth per invocation: 26 words 


’ 1605 1 
1606 1 


i | 
Z CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 Page 6! 
| V01.0 GLOBAL ROUTINE - ERRORSREPORT ( ) 14-Mar-1985 13:06:01 DISK$USER2: [MARSHALL .DEQNA]ZQNA4.BL1;4 (4)! 
000114 013746 000006G MOV XMIT.D.LIST+6,-(CSP) 
000120 012746 000000G MOV #MSG07, -( SP) 
000124 012746 000003 MOV #3,-CSP) 
000130 010600 MOV SP ,RO ; SP,» 
000132 104414 - TRAP 14 
000134 013716 000010G MOV RCV.D.LIST+10, (SP) : 1599 
000140 042716 000360 BIC #360, (SP) 
000144 013746 000010G MOV XMIT.D.LIST+10,-CSP) 
000150 042716 020017 BIC #20017, CSP 
000154 012746 000000G MOV #MSGO6, - 
000160 012746 000003 MOV #3,-CSP) 
000164 010600 MOV SP ,RO ; SP,* 
000166 104414 TRAP 14 
000i70 005016 CSP) ; 1600 
000172 113716 000012G MOVB RCV.D.LIST+12, (SP) 
000176 013746 000012G MOV XMIT.D.LIST+12,-CSP) 
000202 042716 140000 BIC #140000, (SP) 
000206 012746 000000G MOV #MSGO9, -C SP) 
000212 012746 000003 MOV #3,-CSP) 
000216 Ol MOV . ; SP,* 
000220 104414 TRAP 14 
000222 013716 000000G MOV CSR.WORD, (SP) : | 1601 
000226 042716 044000 Bic #44000, (SP 
000232 012746 000000G MOV #MSG10, -( SP) 
000236 012746 9000002 MOV #2,-( 
000242 010600 MOV RO ; SP, 
000244 104414 TRAP 14 
000246 017716 000000G MOV @HWP . TABLE , (SP) ; 1602 
000252 012746 000000G MOV #MSGi1,-(CSP) 
000256 012746 000002 MOV #2,-C 
000262 O01 MOV RO ; SP,« 
000264 104414 TRAP i 
000266 062706 000060 ADD #60 , SP : 1592 
000272 000207 RTS PC 
+ Routine Size: 94 words, Routine Base: ACS$CODE$ + 0010 
: 
| 





He 


| na SEQ 0227 ! 
_ ZQNA4 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 
_— GLOBAL ROUTINE - E1$REPORT ( ) 14-Mar-1985 13:06:01 DISK $USER2: [MARSHALL .DEGNAJZQNA4.BLI.a (s) | 
js 1607 1 SSBTTL ‘GLOBAL ROUTINE - E1LSREPORT ( )' 
; 16068 1 
; 1609 1 fee 
$ 1610 1 ! 
; 1611 1 ' GLOBAL ROUTINE : E1$REPORT 
$ 16i2 1 ‘ ' 
; 1613 1 ! DESCRIPTION: 
; 1614 1 ' | 
$ 1615 1 H This routine reports errors to the operator 
' 1616 1 : 
$ 1617 1 $-- 
$ 1618 1 
$ es : SSBTTL ‘GLOBAL ROUTINE - E1S$REPORT ( )’ 
$ 
$ 1621 1 BGNMSG ( E1$REPORT ); 
-SBTTL E1$REPORT GLOBAL ROUTINE - ELSREPORT ( ) 
000000 004737 Q00000V E1$REPORT:: 
JSR PC ,M$E1$REPORT : 1621 
000004 104423 TRAP 23 
000006 000207 RTS PC 
+ Routine Size: 4 words, Routine Base: ACSCODE$ + 0304 
; Maximum steck depth per invocation: 2 words 
; 1622 2 
; 1623 2 TEMP1 = 1; 
; 1624 2 
; 1625 1 ENDMSG ; 
-SBTTL MSEL$REPORT GLOBAL ROUTINE - E1LSREPORT ( ) 
000000 012737 000001 000000G MSEL$REPORT: 
MOV #1, TEMP1 ; 1623 
000006 000207 RTS PC : 1621 
+ Routine Size: 4 words, Routine Base: ACSCODE$ + 0314 
: Maximum steck depth per invocation: 0O words 
; 1626 1 
; 1627 1 


ee <r enn ~~ — 


Be ee ee ee ee ee ee ee ee be ee ee ee > be he ee he be bee he he ee he be ee 


_——— i ee ee 


Te 


14-Mer-1985 13:18:55 


CZQ@NADO DEQNA FUNCTIONAL TEST 
14-Mar-1985 13:06:01 


GLOBAL ROUTINE - RESET_DEQNA ( ) 
SSBTTL ‘GLOBAL ROUTINE - RESET_DEQNA ( )’ 
GLOBAL ROUTINE RESET_DEQNA : NOVALUE = 


2 
+ 


GLOBAL ROUTINE : RESET_DEQNA 
DESCRIPTION: 


CSR register. After the reset, CSR is checked for nominal 


INPUT PARAMETERS: 


stetus. 
Herdwere tested: Q-Bus DMA Interface 
4 
: Processing: 
V 
: BEGIN 
HY set Software Reset (SR) bit in CSR and check for 
: expected CSR status 
: IF error 
: THEN 
: print error message if not inhibited 
: ENDIF 
: clear SR bit in CSR and check for expected CSR status 
: IF error 
: THEN 
: error message if not inhibited 
S 
END 
& 
4 
iu 





VAX-i1 Bliss-16 V4.1-582 


—— me —- = 


SEQ 0228 
Page 


DISK $USER2 : [MARSHALL . DEQNA)]ZQNA4 .BLI;4 


This routine verifies that DEQNA can be reset by setting bit 1 in the 


(6) 


| 
| 


ee 


HMNNUUUUUUUNUNUNUNUNNNUNUUUUWUUUYNYYNNYNNYNNNE Eee Eee 


———— ee —— 





_—— einai 


SEQ 0 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 P aot 9 
GLOBAL ROUTINE - RESET_DEQNA ( ) 14-Mar-1985 13:06:01 DISK$USER2: [MARSHALL . DEQNA)ZQNA4.BLI;4 (7) 


’ 
! RESET THE DEVICE AND CHECK CONTENTS OF CSR FOR NOMINAL STATUS 


BEGIN 


PUT_BIT ( CSR, ALL_BITS, ZERO ); 
PUT_BIT (€ CSR, SR, SET_IT ); 


DELAY € TIME6_LIMIT ); 
TEMP1 = GET_BIT [ CSR_ALL ] AND CSR2_MASK; 


IF .TEMP1 NEQU CSR1_STATUS 
THEN 


BEGIN 
ERR_FLAG = ONE; 
CSR_WORD = GET_BIT [ CSR_ALL ]; 
PRINTB ( MSGS9 ); 


MSG3SO, .GET_ADR { CSR_ALL J], .TEMP1, CSR2_STATUS ); 
“— ( 0001, MSGOO, E1$REPORT ); 


See 
! CLEAR SOFTWARE RESET BIT IN THE CSR AND CHECK FOR EXPECTED STATUS 


PUT_BIT ( CSR, SR, CLR_IT ); 

DELAY ( TIME6_LIMIT ); 

TEMP2 = GET_BIT [ CSR_ALL J] AND CSR2_MASK; 
IF a NEQU CSR2_STATUS 


ERR_FLAG = ONE; 
CSR_ 
PRINTB ( MSGS9™ 


PRINTB (€ MSG30, .GET_ADR ( CSR_ALL J, .TEMP1, CSR2_STATUS ); 
“—" ( 0002, MSGOO, E1$REPORT ); 
; 


rar 
z 
=~ 
s+) 
an 
Ww 
pas 
hate 


END; 
-GLOBL LSDLY 


-SBTTL RESET.DEQNA GLOBAL ROUTINE - RESET_DEQNA ( ) 


v 
p *] 
z 
wo 

ar 
W 

baal bee ) 
ww 
gh 
SRR REIEEEEE ee ______________ e ————— 


er 


CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - RESET_DEQNA ( ) 


RESET . DEQNA: : 


000000G 
000000G 000062 


000014 
000016 000014 


000000G 
000002 000016 


000014 


1$: 


2$: 
3$: 
4$: 


5$: 


6$: 


7$: 


Ke 


14-Mar-1985 13:18:55 
14-Mar-1985 13:06:01 


R1, $SAVE2 
#16 


» SP 
REG. ADR ,RO 
#16,R2 
RO,R2 


C(R2),CSP) 
CSP), TEMP1 
#10000, TEMP1 
gata 


#1,ERR.FLAG 


MSGOO 
E1$REPORT 
#16,SP 
REG. ADR ,RO 
#2,16(RO) 
#1,R2 


9$ 
LsDLY,R1 
8$ 
14(SP) 


VAX-11 Bliss-16 V4.1-582 Page 
DISK$USER2: [MARSHALL . DEQNA )ZQNA4 .BLI;4 


*,$$TMP2 
+, $$TMP1 
$$TMP 
$$TMP1,* 
$$TMP2 


*, TMP .LOCATION 


*, TMP .LOCATION 


SP ,* 


SP ,* 


+, TMP .LOCATION 
¢, TMP .LOCATION 
TMP .LOCATION, « 


SP ,¢ 


+, $$TMP2 
¢, $$TMP] 
$$ TMP 


SEQ ooeee 


| 


10 | 
(7) ) 


1630 | 
1672 | 


i 
— 
1675 | 
| 


1676 
1678 


1681 
1682 


1683 
1084 


1685 


1686 


1680 
1695 


1696 


- —_—- <—-_ hl TE TE ET TT = <a 


000262 077103 
302 


; Routine Size: 
+; Maximum steck 


: 1710 1 


CZQNADO DEQGNA FUNCTIONAL TEST 
- RESET_DEQNA ( ) 


GLOBAL ROUTINE 


000000G 000022 
000016 000022 


000016 
000016 


153 words, 


Le 


SoB R1,7$% 

8$: DEC R2 
BR 6% 

9$ MOV 16(RO).6( SP) 
MOV 6( SP), TEMP? 


14-Mer-1985 13:18:55 
14-Mer-1985 13:06:01 


Q 10$ 
MOV #1.,ERR.FLAG 
MOV 6(SP),10(SP) 
MOV 1 . . WORD 
MOV hee ) 
MOV @1,-CSP) 

SP, 

TRAP 14 
MOV @mSG31,(SP) 
MOV #1,-( 
MOV SP, 
TRAP 44 


MOV GET. ADR ,22( SP ) 
ADO 416,22(SP) 
MOV 22(SP), -CSP) 
MOV 30, - ) 
MOV 64,-(SP) 

MOV eRO 

TRAP 14 

TRAP 55 

-WORD 2 


10$: ADD €16,SP 
RTS PC 


Routine Base: ACSCODES - 0324 


depth per invocation: 19 words 


VAX-11 Bliss-16 V4.1-582 age 
DISK $USER2 : (MARSHALL . DEQNA )ZQNA4 .6LI;4 


$sTMPi.e 
$sTMP2 


*, TAP .LOCATION 
TMP .LOCATION, « 


¢, TMP .LOCATION 
TMP .LOCATION, « 


SP, 


SP, 


; *,TMP.LOCATION 


*, TMP .LOCATION 
TMP .LOCATION, « 


SP, 


SEQ 0231 
Pp 


at 
< 
PON 8 BD BD DD BEB ENA be be ee ee be be ee ee ee be ee 


Me 


CZQNADO DEGNA FUNCTIONAL TEST 14-Mer-1985 15:18:55 VAX-11 Bliss-16 V4.1 


SSBTTL ‘GLOBAL ROUTINE - VER_DESCR_STATUS ( )° 
GLOBAL ROUTINE VER_DESCR_STATUS : NOVALUE - 


a 
& 


GLOBAL ROUTINE : VER _DESCR_STATUS 


DESCRIPTION: 


This routine comperes expected receive descriptor to actual receive 
descriptor. 


INPUT PARAMETERS: 
TEST_NO - test number in which error occurred. 


BEGIN 
INCR INDEX FROM O T0 BD_D_SIZE - 1 DO 
BEGIN 


TEMP1 = .DESCR_LIST { . INDEX, W_LEN ]); 
TEMP2 = .DESCR_LIST { . INDEX, W_LEN ] AND RFLG_MASK; 
-- .TEMP2 NEQU RFLG_MASK ) AND ( .TEMP1 NEQU .BD_PROM_DESCR [ .INDEX } ) 


HEN 
BEGIN 
CSR_WORD = GET_BIT { CSR_ALL ]; 
PRINTB ( MSGS9 ); 
PRINTB ( MSG48 ); 
PRINTS ( MSGSO, .TEMP1, a ecoent 2 ug { .INDEX ]) , . INDEX ); 


ERROF ( 0003, MSGOO, ERROR S$ 
END; 
END; 


TTL VER.DESCR.STATUS GLOBAL ROUTINE - VER_DESCR_STATUS ( ) 


. SB 
000000G VER.DESCR. STATUS: : 
Ri, $SAVE2 : 
-( SP) 


CLR Re ; INDEX 
1$: MOV lt Ps INDEX, 


1 
000000G 000000G MOV DESCR .LISTCR1), TEMP1 
MOV DESCR .LIST(R1), TEMP2 ; 


000000G 000000G 
037777 000000G BIC 637777, TEMP2 
000000G 140000 CMP TEMP 2 , 8-40000 : 


es 
000000G 000000G CMP DESCR.LISTC(R1),B80.PROM.DESCR(R1) 


SEQ 0232 
-582 Cage 
GLOBAL ROUTINE - VER_DESCR_STATUS ( ) 14-Mer-1985 13:06:01 DISK $SUSER2: 2T (MARSHALL DEQNA )ZQNA4 .GL1;4 


le 
(8) 


ee ee ee -— eee = 


+ Routine Size: 
; hieximum eteck 


s 4749 1 


- 


CZGNADO DEGNA FUNCTIONAL TEST 


GLOBAL ROUTINE - VER_DESCR_STATUS ( ) 


000000G 
000016 
0009C0G 


00006CG 
000001 


000000G 
000001 


000017 


64 words, 
depth per invocetion: 


PEE EEE}. 


~4 
D 


sees 


~d 
g 


SEE EEL 


: 
DD 
a0 


Routine Base: 


2% 

REG. ADR ,RO 
16(RO), CSP) 
(SP 


14 
R2,(SP) 


MSGOO 
ERROR $REPORT 
#16,SP 


2 
Re, 017 
i$ 

CSP )+ 
PC 


ACSCODE$ + 1006 


w—_—_——- _—— ee ee ee _- -_ -_ - - 


SEQ 0233 
VAX-11 Bliss-16 V4.1-S82 Pege 13 
DISK$USER2: (MARSHALL .DEQNA)ZQNA4.BLI;4 (8): 


3 1740 
; ¢, TMP .LOCATION 
; TMP .LOCATION,« 

H 1741 
f SP, 

3 1742 | 
; SP, 

; INDEX,« 1743 
; INDEX 1733 
; INDEX, * 

: 1713 


——_ ——_— — 


N 


QNA4 
01.0 


a 


SP GP Ge GP GF Ge Ge GP Ge Ge es G2 Ge Ge Ge Ge es Ge Gs G Ge ce oe 
~ 
~ 
oa 
‘> 


-_— a ee ee | 


PON GID DD bb be be be be be ee ee ee 


: Routine Size: 
; Meximum stack 


: 1773 
; 1774 


1 
1 





i 
CZQNADO DEGNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 VAX-11 Bliss-16 Vv4.1-582 > ~* 14 
GLOBAL ROUTINE - CLR_DESCR ( ) 14-Mer-1985 13:06:01 DISKSUSER2: (MARSHALL .DEQNA)ZQNA4.BLI1;4 (9) 
SSBTTL ‘GLOBAL ROUTINE - CLR_DESCR ( )’‘ 
GLOBAL ROUTINE CLR_DESCR : NOVALUE = | 
See 
: 
; GLOBAL ROUTINE : CLR_DESCR 
DESCRIPTION: 
This routine initializes transmit and receive descriptor lists to 0. 
BEGIN 
INCR INDEX FROM O TO D_SIZE - 1 DO 
BEGIN 
XMIT_D_LIST { .INDEX, W_LEN ] = O; 
RCV_D_LIST [ .INDEX, W_.LEN ) = O; 
3 : 
END; 
-SBTTL CLR.DESCR GLOBAL ROUTINE - CLR_DESCR ( ) 
CLR. DESCR:: 
CLR RO ; INDEX 1766 
000000G i$: CLR XMIT.D.LISTCRO) ; *C INDEX) 1768 
000000G CLR RCV.D.LISTCRO) ; *C INDEX) 1769 
000002 ADD 92,R0 ; *, INDEX 1766 
000176 CMP RO, #176 ; INDEX,« 
BLE i$ 
RTS F 1752 
11 words, Routine Bese: ACSCODE$ + 1206 


depth per invocation: 0O words 








wee PSF 8 FRB S88 SFB FBS 8B HBS BS S&S & © & & Oo 
BRO PO G8 G8 GE TD 10 1D bb be be be be ee be be ee be be be be be ee be 


+ Routine Size: 
; Meximum stack 


ee ee 


LS 


depth per invocation: O words 


! 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 _ Font s | 
GLOBAL ROUTINE - CLR_BUFFERS ( Pil ) 14-Mar-1985 13:06:01 DISK$USER2: : (MARSHALL . DEQNA )ZQNA4. Ee (103 | 
SSBTTL ‘GLOBAL ROUTINE - CLR_BUFFERS ( Pi )’ 
GLOBAL ROUTINE CLR_BUFFERS ( P1 ) : NOVALUE = 
fee 
: | 
! GLOBAL ROUTINE : CLR_BUFFERS | 
: DESCRIPTION: 
! This routine initializes transmit and receive buffers to 0. 
a 
! INPUT PARAMETERS: 
? 
. Pi - number of bytes to clear. 
g 
René 
BEGIN 
INCR INDEX FROM O TO .P1 - 1 DO . 
BEGIN 
RCV_BUFFER [ .INDEX ) = 0; 
XMIT_BUFFER [ .INDEX ] = O; 
END; 
END; 
-SBTTL CLR.BUFFERS GLOBAL ROUTINE - CLR_BUFFERS ( P1 ) 
CLR. BUFFERS: : 
CLR RO ; INDEX 1796 
BR 2$ 
000000G 1$: CLRB RCV. BUFFERCRO) ; *C INDEX) 1798 
000000G CLRB XMIT .BUFFERCRO) ; *C INDEX) 1799 
INC RO ; INDEX 1796 
000002 2$: CMP RO,2CSP) ; INDEX,Pi 
BLT i$ 
RTS PC ; 1777 
11 words, Routine Base: ACSCODE$ + 1234 
| 
' 
| 
| 


——— 


POOP G8 O88 G8 OE EPO PO 10 G8 68 G8 BED O10 PO GEO D0 DDD ee ee ee eb ee eh be 








a 


D3 


SEG =” » 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 Page 
GLOBAL ROUTINE - CHK_RIXI_STATUS ( Pi ) 14-Mar-1985 13:06:01 DISK$USER2: [MARSHALL . DEQNA )ZQNA4. BLI;4> (1 


SSBTTL ‘GLOBAL ROUTINE - CHK_RIXI_STATUS ( Pi )’ 
GLOBAL ROUTINE CHK_RIXI_STATUS ( P1 ) : NOVALUE = 


* 
e 


GLOBAL ROUTINE : CHK_RIXI_STATUS 
DESCRIPTION: 
This routine verifies that XI ( bit 7 ) and RI ( bit 15 ) 
of the CSR stetus word are set to 1 shortly after transmission of a 


loopback packet is complete. If either bit isn’t set, an error 
message is printed. 


INPUT PARAMETERS: 
Pi - 0: check XI and RI 
- 1: ckeck XI 
- 2: check RI 


TEST_NO - test number in which error occurred. 


! CHECK TRANSMIT INTERRUPT REQUEST BIT ( XI - BIT 7 ) TO VERIFY THAT DEQNA 
4 _ACTUALLY COMPLETED TRANSMISSION OF A LOOPBACK PACKET. 
'. 


IF ( .Pi EQLU O ) ORC .P1 EQLU 1 ) 
THEN 


INCR INDEX FROM O TO TIME2_LIMIT DO 
‘a { CSR, XI J EQLU ONE 


BEGIN 
TEMP1 = .INDEX; 
EXITLOOP ; 

END 


ELSE 
IF .INDEX EQLU TIME3_LIMIT 
THEN 


BEGIN ; 
ERR_FLAG = ONE; 
CSR_WORD = GET_BIT [ CSR_ALL ]; © 
PRINTB ( MSG59 ); 


PRINTB (€ MSG29 ); 
PRINTB ( wa ); 
ERRDF (€ 0004, MSGOO, ERROR$REPORT ); 


-_———_—— 


<N 


RN WOOO Ol Ot ito PO fo Wt ot Gd PD PO PO PO ED PUD fH 





os — Oe Ee ee 


ES 


CZQ@NADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 VAX-11 Bliss-16 V4.1-S582 ~~ 17! 
GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 ) 14-Mar-1985 13:06:01  DISK$USER2: (MARSHALL .DEQNA)ZQNA4.BLI:4~ ate 
! CHECK RECEIVE INTERRUPT REQUEST BIT ( RI - +. 15 ) TO VERIFY THAT DEQNA 
! ACTUALLY RECEIVED TRANSMITTED LOOPBACK PACKET 
pa 2 
Fe ee ee 3 
INCR INDEX FROM O TO TIME2_LIMIT DO | 
IF GET_BIT { CSR, RI } EQLU ONE 
THEN 
BEGIN 
TEMP2 = .INDEX; 
EXITLOOP; 
ELSE 
IF .INDEX EQLU TIME2_LIMIT 
THEN 
BEGIN 
ERR_FLAG = ONE; 
CSR_ “WORD = GET _BIT ( CSR_ALL ]; 
PRINTB ( MSG59 ); 
PRINTB (€ MSG29 : 
PRINTB (€ MSG25 ); 
ERRDF (€ 0005, MSGOO, ERRORSREPORT ); 
END; 
END; 
-SBTTL CHK.RIXI.STATUS GLOBAL ROUTINE - CHK_RIXI_STATUS ( Pi ) 
000000G CHK .RIXI.STATUS:: 
JSR a : 1807 
000010 SuB 
000022 MOV 5a SP) RE ; Pl,# 1836 
CLR R3 
TST Re 
BNE i$ 
INC R3 
BR 2$ 
000001 1$: CMP R2,%1 
BNE 6$ 
2$: CLR Ri ; INDEX 1838 
000000G 3$: MOV REG. ADR,RO 3 1839 
000016 MOV 16(RO), CSP) ; *, TMP .LOCATION 
TSTB (SP) ; TMP .LOCATION 
BPL 4$ 
000000G MOV R1, TEMP1 ; INDEX,* 1842 
BR 6$ ; 1841 
002000 4$: jon oo ; INDEX,* 1846 
000001 000000G MOV #1,ERR.FLAG ; 1849 
000016 000002 MOV 16(RO),2CSP) ; *, TMP.LOCATION 1850 
000002 000000G MOV 2(SP),CSR.WORD ; TMP.LOCATION,« 
0000006 MOV #MSG59, -( SP) ; 1851 
000001 MOV #1,-(SP) 


eee 


CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 ) 


000000G 
000001 


000000G 
000001 


5$: 


6$: 


7$: 


8$: 


9$: 


10$: 


$3333353"3% 


: 


Bigg g882 222 





rs 


14-Mer-1985 13:18:55 
14-Mar-1985 13:06:01 


FLAG 


MSGOO 

ERROR $REPORT 
#10,SP 

Ri 

Ri, #2000 

8$ 


VAX-11 Bliss-16 V4.1-582 Page 
DISK$USER2: [MARSHALL . DEQNA)ZQNA4. BLI;4> (11) 


; SP, 


SP,* 


INDEX , * 


INDEX 

*, TMP .LOCATION 
INDEX, * 
INDEX , + 


*, TMP .LOCATION 
TMP .LOCATION, « 
SP ,* 


SP ,* 


INDEX, * 


ee ee ee iS ca | 


SEQ 0238 


1880 





G3 


| ZQNA4 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 “i. + 9! 
vo1.0 GLOBAL ROUTINE - CHK_RIXI_STATUS ( Pi ) 14-Mer-1985 13:06:01 DISK$USER2: [MARSHALL . DEQNA )ZQNA4. BLI;4° 13 
000356 062706 000010 11%: ADD #10,SP | 1807 
000362 000207 RTS PC 
; Routine Size: 122 words, Routine Base: ACSCODE$ + 1262 


; Maximum steck depth per invocation: 14 words 


; 16863 1 





CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 “ae 20 ! 
GLOBAL ROUTINE - CHK_CSR_STATUS ( Pi, P2 ) 14-Mer-1985 13:06:01 DISK $USER2: [MARSHALL . DEQNA)ZQNA4. BLI;4> (12) 
SSBTTL ‘GLOBAL ROUTINE - CHK_CSR_STATUS ( P1, P2 )' 


GLOBAL ROUTINE CHK_CSR_STATUS ( P1, P2 ) : NOVALUE = 


* 
> 


GLOBAL ROUTINE : CHK _CSR_STATUS 
DESCRIPTION: 

This routine checks CSR status words for expected status. 
INPUT PARAMETERS: 

P1 - expected CSR status 


P2 - CSR mask 
TEST_NO - test number in which error occurred. 


BEGIN 


See 


! SAVE CSR, RESET TRANSMIT AND RECEIVE REQUEST BITS IN THE CSR 


DELAY ( 5 ); 
CSR_WORD = GET_BIT ( CSR_ALL ]; 


PUT_BIT ( CSR, RI, ONE J; 
PUT_BIT ( CSR, XI, ONE J; 


TEMP1 = .CSR_WORD AND .P2; 
IF .TEMP1 NEQU .P1 
THEN 
BEGIN 
ERR_FLAG = ONE; 
PRINTB ( MSG59 ); 


PRINTB ( MSGi2, .TEMP1, .Pi ); 
_— € 0006, MSGOO, ERROR $REPORT ); 
END; 


END; 


8 
~“ 
PNUAUUUUNUMUNUNUNNNVNNVNNNNNE EE RRP RR Rhee 


. SBTTL CHK. CSR.STATUS GLOBAL ROUTINE - CHK_CSR_STATUS ( Pl, P2 ) 
010146 CHK.CSR. STATUS: 
MOV 'R1,-(SP) ; 1886 
024646 CMP -(SP),-(€SP) 
012701 000005 MOV #5,R1 ; *,$$TMP2 1910 
001410 1$: BEQ 4$ 
013700 000000G MOV L$DLY,RO ; *,$$TMP1 





: Routine Size: 
; Maximum stack 


; 1928 i 
3 1929 i 


Oe 


CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - CHK_CSR_STATUS ( P1, P2 ) 


000002 


000012 


61 words + 
depth per invocation: 


Routine Base: 





is 


14-Mar-1985 13:18:55 
14-Mar-1985 13:06:01 


3$ 

2(SP) 

RO,2$ 

Ri 

i$ 
REG.ADR,RO 
#16,RO0 
rapt he 
CSP), TEMP1 
10(SP),RO 
RO 

RO, TEMP1 

+ ig entail 
#1,ERR.FLAG 
@MSGS9, - CSP) 
#1,-CSP) 

SP ,RO 


14 
16(SP),(SP) 
TEMP SP) 


MSGOO 
ERROR SREP ORT 


#12,SP 
CSP)+,CSP)- 
CSP)+,R1 
PC 


ACSCODE$ + 1646 


————— «<== ees oo 


SEQ 0241 =~ 
VAX-11 Bliss-16 V4.1-582 Page 21! 
DISK$USER2: (MARSHALL .DEQNAJZQNA4.BL1;4 (12) | 
; $$TMP 
; $$TMP1,* 
; $$TMP2 
; 1912 


; *, TMP .LOCATION 


; 1915 
$ —_—* 1917 
° ,* 

3 *,P1 1919 
; 1922 
; 1923 
5 SP ,* 

; Pl,* 1924 
3 SP ,* 

; 1925 
3 1921 
; 1886 


NVNVUNNVVUNNNNNNUBUUUUNUNNYNUNNVNNNE EE ERR RRR RR mee eee 


re _-_-——— = 





ee ee eh Ac cc A cit. ae eta 


JS 


CZQNADO DEQNA FUNCTIONAL TEST 


SSBTTL ‘GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 )' 
GLOBAL ROUTINE CHK_XMIT_STATUS ( P1, P2 ) : NOVALUE = 


a 

y 

GLOBAL ROUTINE : CHK_XMIT_STATUS 

' DESCRIPTION: 

t 

This routine checks transmit status words for expected status. 
! INPUT PARAMETERS: 

§ 

! Pi - XMIT flag word 

4 
t 
u 
: 
4 


P2 - expected XMIT stetus word 1 
TEST_NO - test number in which error occurred. 


BEGIN 


See 


! MASK OUT DON'T CARE BITS IN THE XMIT FLAG WORD AND COMPARE TO EXPECTED 
: RA ee STATUS. IF STATUS NOT EQUAL THEN PRINT ‘BAD XMIT FLAG WORD 

’ ’ 

Swe 


TEMP2 = .XMIT_D_LIST { FLGWD ]) AND XFLG_MASK; ! 0'140000' 
IF .TEMP2 NEQU .P1 
THEN 
BEGIN 


ERR_FLAG = ONE; 
CSR_WORD = GET_BIT [ CSR_ALL ]; 
PRINTB ( MSG5S9 ); 
PRINTB ( MSG13, ‘TEMP2, XFLG_MASK ); 
-_—" € 0007, MSGOO, ERROR$REPORT ); 
; 


! MASK OUT DON’T CARE BITS IN THE XMIT STATUS WO1 AND COMPARE TO EXPECTED 
Dad STATUS WD1. IF STATUS NOT EQUAL THEN PRINT ‘BAD XMIT STATUS WORD 1' 
'. 


IF .XMIT_D_LIST ( STWD1 ) GTRU ZERO 
THEN 


f Tews = .XMIT_D_LIST { STWO1 J) AND XWD1_MASK — ' 0'157760' 
L 
TEMP3 = .XMIT_D_LIST { STWD1 ] AND X1_MASK; ! 0'100000' 


IF . TEMPS NEQU .P2 


SEQ 024 
14-Mar-1985 13:18:55  VAX-11 Bliss-16 V4.1-582 “oan - 
GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 ) 14-Mar-1985 13:06:01  DISK$USER2: (MARSHALL .DEQNAJZQNA4.BLI;4~ (13) 


Ke 


VAX-11 Bliss-16 V4.1-582 
DISK$USER2: (MARSHALL . DEQNA JZQNA4. BLI;4 (13) | 


TTL CHK. XMIT.STATUS GLOBAL ROUTINE - CHK _ XMIT_STATUS ( #1, P2 ) 


_ ZQNA4 CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 
, VOl. 0 GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 ) 14-Mer-1985 13:06:01 
; 1983 2 THEN 
; 1984 3 BEGIN 
; 1985 3 ERR_FLAG = ONE; 
$ 1986 3 CSR_WORD = GET _BIT { CSR_ALL J; 

; 1987 3 PRINTB ( MSGS9 ); 
$ 1988 3 PRINTB ( MSG14, .TEMP3, .P2 ); 
; 1989 3 ERRDF ( 0008, MSGOO, ERROR $REPORT ): 
; 990 2 END; 
$ 1991 2 
j 1992 1 END; 

. SB 
000000 024646 CHK. XMIT.STATUS: 

CMP “(SP), -(SP) 
000002 013737 000000G MOV XMIT.D.LIST, TEMP2 
000010 042737 037777 000000G BIC #37777, TEMP2 
000016 023766 000010 CMP TEMP2 , 100 SP) 
000024 001437 BEQ i$ 
000026 012737 900001 000000G MOV #1,ERR.FLAG 
000034 013700 MOV REG. ADR,RO 
000040 016016 0900016 MOV 16(CRO), CSP) 
000044 011637 MOV (SP),CSR.WORD 
000050 012746 MOV #MSG59, -CSP) 
000054 012746 000001 MOV $1,-CSP) 
000060 010600 MOV SP ,RO 
000062 104414 TRAP 14 
000064 012716 140000 MOV #-40000, (SP) 
000070 013746 000000G MOV TEMP2, -C SP) 
000074 012746 000000G MOV #MSG13,-CSP) 
000100 012746 000003 MOV #3,-( 

000104 010600 MOV SP, 

0001 104414 TRAP 14 

000110 104455 TRAP 55 

000112 000007 -WORD 7 

000114 000000G -WORD #MSGOO 

000116 900000’ -WORD ERRORSREPORT 

000120 062706 000012 ADD #12,SP 

000124 013700 000010G 1$: MOV XMIT.DO.LIST+10,R0 

000130 001406 BEQ e$ 

000132 010037 MOV RO, TEMPS 
seedy 042737 020017 000000G og el al 
900146 010037 2$: MOV RO, TEMPS 
000152 042737 0677777 000000G BIC 077777, TEMPS 
900160 023766 000006 3$: CMP > 6(SP) 
900166 001441 BEQ 
900170 012737 000001 000000G MOV ~¢ ERR. _ 
900176 013700 MOV REG. ADR ,R 
0002C 01 000016 000002 MOV 16CRO)_2CSP) 
900210 016637 000002 000000G MOV 2(SP),CSR.WORD 
900216 012746 000000G MOV @MSG59, - (SP) 
900222 012746 9000001 MOV #1,-(SP) 


*,Pi 
*, TMP .LOCATION 


TMP .LOCATION, « 


SP ,* 


SP ,* 


*,P2 


¢, TMP .LOCATION 
TMP .LOCATION, « 


SEQ ~— ie 


1968 


——— 


000272 
000274 


: Routine Size: 
; Meximum steck 


3 1993 
$ 1994 


1 
1 


CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 ) 


000012 
000000G 


000000G 
900003 


000012 
4$: 


95 words, 
deoth per invocation: 


Routine Base: 
9 words 


L3 


14-Mer-1985 13:18:55 
14-Mer-1985 13:06:01 


SP RO 


14 
12(SP),(SP) 
TEMP ) 


MSGOO 

ERROR SREPORT 
#12,SP 

CSP )+,(SP)- 
PC 


ACSCODE$ + 2040 


VAX-11 Bliss-16 V4.1-S582 


SEQ 0244 


Page 24 
DISK $USER2: (MARSHALL .DEQNA)ZQNA4.BLI;4 (13) 


i SP ,« 
; PZ, 


é SP ,* 


i 
i 


1988 | 


PO DO 8 8 8 8 8 GD RD PDD DI bm be ee eee ee ee ee ee ee ee ee 


CZQNADO DEQNA FUNCTIONAL TEST 


SSBTTL ‘GLOBAL ROUTINE - CHK_RCV_STATUS ( ©1, P2 )’ 
GLOBAL ROUTINE CHK_RCV_STATUS ( P1, P2 ) : NOVALUE = 
GLOBAL ROUTINE : CHK _RCV_STATUS 
DESCRIPTION: 

This routine checks receive stetus words for expected stetus. 
INPUT PARAMETERS: 

Pi - expected RCV fleg word 


P2 - expected RCV stetus word i 
TEST_NO - test number in which error occurred. 


a 
’ 
' 
‘ 
' 
' 
’ 
' 
' 
‘ 
: 
: 
: 
‘ 
‘ 
BEGIN 


! MASK OUT DON'T CARE BITS IN THE RCV FLAG WORD AND COMPARE TO EXPECTED 
oe STATUS. IF STATUS NOT EQUAL THEN PRINT ‘BAD RCV FLAG WORD 


TEMP1 = .RCV_D_LIST ({ FLGWD ) AND RFLG_MASK; ! 0'140000' 
IF . TEMP] NEQU .P1 
THEN 


CSR_WORD 

PRINTB ( MSGS9 ); 

PRINTB ( MSG15, TEMP, RFLG_MASK ); 
RROF ( 0009, MSGOO, ERRORSREPORT ); 


: 
! MASK OUT DON'T CARE BITS IN THE RCV STATUS WD1 AND COMPARE TO EXPECTED 
RCV STATUS WD1. IF STATUS NOT EQUAL THEN PRINT ‘BAD RCV STATUS WORD 1' 
"Mme { STWO1 ) GEQU ZERO 
ie * .RCV_D_LIST ( STWD1 ) AND R2_MASK ! 0'174017' 
TEMP2 = .RCV_D_LIST { STWD1 ] AND .P2; 
IF ,TEMP2 NEQU .P2 

THEN 


EL 


14-Mer-1985 13:18:55 VAX-11 Bliss-16 Vv4.1- 
GLOBAL ROUTINE - CHK_RCV_STATUS ( Pl, P2 ) 14-Mer-1985 13:06:01 DISK SUSER2 : : (MARSHALL . DE GNA IZONAG. au1,3 


SEQ — 


we 


25 
(14) 


5 
~\ 
PMN UWUwuw 


024646 
013737 


012746 


nl amma A A, ie 


CZQNADO DEGNA FUNCTIONAL TEST 
GLOBAL ROUTINE - CHK_RCV_STATUS ( P1, P2 ) 


END; 


000000G 000000G 
037777 000000G 
000000G 000010 
000001 000000G 
000000G 
000016 
000000G 


000000G 
000001 


140000 


000003 


000012 


000010G 
0600000G 
003764 

000000G 


ERR_FLAG = ONE; 

SR_WORD = GET_SIT { CSR_ALL ]; 
PRINTS ( MSGSO ) 
PRINTB ( MSG16, .TEMP2, .P2 ); 

—_—" € 0010, MSGOO, ERRORSREPORT ); 

‘ 


000002 
000000G 


CHK .RCV.STA 
CMP 


Aly CHK.RCV.STATUS GLOBAL ROUTINE - 


N3 


14-Mar-1985 13:18:55 
14-Mer-1985 13:06:01 


-(SP),-CSP) 
RCV.D.LIST, TEMP1 
637777, TEMP 

+» steal 


i 
#1,ERR.FLAG 
REG. ADR ,RO 
16(RO), (SP) 
SP),CSR 


MSGOO 

ERROR SREPORT 
612,SP 
RCV.D.LIST+10,RO 
RO, TEMP2 

#3764, TEMP2 
TEMP2 ,6( SP) 


2s 

61,ERR.FLAG 
REG. ADR ,RO 
16(RO),2¢CSP) 
2(SP).CSR.WORD 
@MSGS9, -C SP) 
#1,-CSP) 

SP ,RO 


14 

12(0SP),CSP) 
TEMP2,-CSP) 
#MSG16, -(SP) 


VAX-11 Bliss-16 V4.1-582 Pege 26. 
DISK $USER2: (MARSHALL . DEQNA )ZQNA4 .BLI;4 C14). 


eee Reet eee iti ee 


CHK_RCV_STATUS ( Pl, P2 ) 


*,Pi 


*, TMP .LOCATION 
TMP .LOCATION, « 


SP ,* 


SP ,* 


*,P2 


+, TMP .LOCATION 
TMP .LOCATION, + 


SP,* 
P2,* 


SEQ 0246 


on i a aes ae Ba 


ZQNA4S CZGNADO DEQGNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 
vo1.0 GLOBAL ROUTINE - CHK_RCV_STATUS ( Pi. P2 ) 14-Mar-1985 13:06:01 
000230 012746 000003 MOV @3,-(SP) 

000234 010600 MOV SP RO 

000236 104414 TRAP 14 

000240 104455 TRAP 55 

000242 000012 -WORD 12 

000244 000000G -WORD MSGOO 

009246 000000’ -WORD ERRORSREPORT 

000250 062706 000012 ADD $12,SP 

000254 022626 2%: CMP (SP)+,CSP)- 

000256 000207 RTS PC 

: Routine Size: 88 words, Routine Base: ACSCODE$ + 2336 


s Maximum steck depth per invocation: 9 words 


$ 2057 1 





SEQ ions 
VAX-11 Bliss-16 V4.1-582 
DISK $USER2: [MARSHALL . DEQNA )ZQNA4. eLt,s" aa) 


; SP,* 

3 2053 
$ 2048 
3 1997 


S 
uv 
C8 EEN 8 CE GE GERD TOPO G8 8 G8 GF 8 GOD P00 GPO D0. 00 9. 0.0 10 0 ee ee ee de 





——  — dd aus. a aga, ay — 


C4 


CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - COMPARE_PACKETS ( ) 


SSBTTL ‘GLOBAL ROUTINE - COMPARE_PACKETS ( )‘ 
GLOBAL ROUTINE COMPARE_PACKETS : NOVALUE = 


o 
+ 


GLOBAL ROUTINE : COMPARE _PACKETS 
DESCRIPTION: 


This routine compares contents of transmit packet to the contents 
of receive packet and prints an error message if the don't compare. 


m 
o 
H 
2 


*¢ 
GET RECEIVE BYTE LENGTH ( RBL ) FROM RCV DISCRIPTOR AND COMPUTE WORD 
LENGTH. THEN COMPARE ACTUAL TO EXPECTED RCV WORD LENGTH. 


TEMPS = O; 
ee { CSR, LB ) GTRU ZERO 
TEMPS = .RCV_D_LIST [ STWD1 ] AND RHL_MASK; ! 0’ 003400’ 


IF € .CSR_WORD AND #0‘01' ) EQLU ZERO 
THEN 


TEMPS = .TEMPS + ( .RCV_D_LIST [{ STWD2 ] AND RLL_MASK ) ! 0'000377' 


ELSE 
TEMPS = 6; 


IF .TEMP3S NEQU .RBUF_LENGTH 
THEN 
ERR_FLAG = ONE; 
CSR_WORD = GET_BIT { CSR_ALL ]}; 
PRINTB ( MSGS9 ); 
PRINTB ( MSG17, .TEMP3, .RBUF_LENGTH ); 
ERRDF ( 0011, MSGOO, ERRORSREPORT ); 
INCR INDEX FROM O TO .TEMP3 - 1 DO 
BEGIN 
"ae { STWD1 ) EQLU NEWB 
RCV_BUFFER [ .INDEX ] = ZERO; 
ra ere { .INDEX ] NEQU .RCV_BUFFER [ .INDEX } 


IF .RCV_D_LIST { LONGP ] EQLU ONE 
THEN 


14-Mer-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 
14-Mar-1985 13:06:01 DISK $USER2: [MARSHALL .DEQNAJZQNA4.BL1;4 (15) 


SEQ 0248 
Page 28! 


eee eee 


. re re me 








D4 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-S582 ~~ 29! 
GLOBAL ROUTINE - COMPARE_PACKETS ( ) 14-Mer-1985 13:06:01 DISK $USER2: : (MARSHALL . DEQNA )ZQNA4 .BL1I;4 a” (1s) | 
BEGIN 
TEMPS = .INDEX; 
EXITLOOP; 
END 
ELSE 
BEGIN 
ERR_FLAG = ONE; | 
CSR_WORD = GET_BIT [ CSR_ALL ]; 
PRINTB (€ MSG59 ); 
PRINTB ( MSG51 ); 
PRINTB (€ MSG5O, RCV _BUFFER ({ .INDEX ], .XMIT_BUFFER [ .INDEX }, .INDEX ); 
ERRDF ( 0012, MSGOO, ERROR$REPORT ); 
END; 
END; 
END; 
. SBTTL COMPARE . PACKETS GLOBAL ROUTINE - COMPARE_PACKETS ( ) 
000000G COMPARE . PACK ETS: 
JSR Ri, $SAVE2] 3 2060 
CMP -(SP),-(SP) 
000000G CLR TEMPS $ 2079 
000000G MOV REG.ADR,RO ; 2081 
000016 MOV 16CRO),-CSP) ; *,TMP.LOCATION 
001400 aon etait ; *,TMP.LOCATION 
000010G 000000G MOV RCV.D.LIST+10, TEMP3 3 2083 
174377 000000G BIC 0174377, TEMPS 
000001 000000G i$: BIT #1,CSR.WORD $ 2085 
BNE e$ 
CLR Ri ; 2087 
000012G BISB RCV.D.LIST+12,R1 
000000G ADD Ri, TEMPS 
BR 3$ $ 2085 
000006 000000G 2$: MOV #6, TEMPS 5 2089 
000000G 000000G 3$: ro b> sts »RBUF .LENGTH : 2091 
000001 000000G MOV #1,ERR.FLAG 3 2094 
000016 000002 MOV 16(RO),2(SP) ; *,TMP.LOCATION 2095 
000002 000000G MOV 2CSP),CSR.WORD ; TMP .LOCATION, + 
000000G MOV @MSGS9, -C SP) | ; 2096 
000001 MOV #1,-<(SP) 
TRAP 14 
000000G MOV RBUF .LENGTH, (SP) : 2097 
000000G MOV TEMPS, -CSP) 
MOV #MSG17,-CSP) 
000003 MOV #3,-(CSP 
TRAP 1 
TRAP 55 ; 2098 
. WORD 13 


; Maximum steck 


; 2126 
$ 2127 





1 
1 


————_ ee ee ee ae 


CZQNADO DEQNA FUNCTIONAL TEST 


GLOBAL ROUTINE - COMPARE_PACKETS ( ) 


000012 
000000G 


000016 


000006 


135 words, 


depth per invocation: 


4$: 


S$: 


6$: 


7$: 


8$: 
9$: 


10$: 


Routine Base: 
15 words 





E4 


14-Mer-1985 13:18:55 
14-Mar-1985 13:06:01 


ERROR $REPORT 
SP 


#12, 
TEMPS ,R2 
R1 


9$ 
aa nes OP. S-20GEeO 


RCV .BUFFER(R1) 
XMIT .BUFFERCR1),RCV.BUFFERCR1) 


8$ 

pee a alata 
Ri, TEMPS 

10$ 


i4 
pe Ty 
— 
RCV .BUFFERCR1), (SP) 
@MSG SP) 
$4 ,-(SP) 

RO 


ACSCODE$ + 2616 


VAX-11 Bliss-16 V4.1-582 Page 
DISK$USER2: [MARSHALL . DEQNA )ZQNA4 .BLI;4 as) 


*C INDEX) 
*(C INDEX) , «C INDEX) 


INDEX, * 


*, TMP .LOCATION 
TMP .LOCATION, « 


SP ,* 


SP ,* 


INDEX, * 


*( INDEX), * 
*C INDEX), « 


SP ,* 


INDEX 
INDEX, * 


-———— — 


SEQ 0250 


2093 
2101 


— 


2121 


2122 


2116 
2101 


2060 





F4 





-™, 0 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 — i! 
GLOBAL ROUTINE - SET_RDESCR_LIST ( Pi, P2) 14-Mer-1985 13:06:01 DISK$USER2: (MARSHALL . DEQNA )ZQNA4. eur,a” 8) 
: SSBTTL ‘GLOBAL ROUTINE - SET_RDESCR_LIST ( Pi, P2)’ 
1 GLOBAL ROUTINE SET_RDESCR_LIST ( P1, P2 ) : NOVALUE = 
ee 
1 « 
: ; GLOBAL ROUTINE : SET_RDESCR_LIST | 
: : DESCRIPTION: 
: This routine initializes receive descriptor list. 
i INPUT PARAMETERS: 
1 : Pl - expected Ethernet packet length in words 
2 : P2 - expected RCV Descriptor List settings 
1 4 
1 
: BEGIN 
2 RCV_D_LIST ({ FLGWD ) = NEWB; 
2 RCV_O_LIST ( OBITS ) = 2: 
2 RCV_D_LIST ({ LOADR ]) = RCV_BUFFER; 
2 RCV_D_LIST ( TWOL J) = .Pi; 
2 RCV_D_LIST ( STWD1 J) = O; 
2 RCV_D_LIST { STWD2 J) = O; 
2 RCV_D_LIST { DLINK J) = V; 
2 RCV_D_LIST ({ BSTAT ] = €E; 
i END; 
-SBTTL SET.RDESCR.LIST GLOBAL ROUTINE - SET_RDESCR_LIST ( Pi, P2) 
012737 100000 000000G SET. RDESCR. LIST:: 
MOV #-100000 ,RCV.D.LIST : 2149 
016637 9000002 000002G MOV 2CSP), RCV.D.LIST+2 ; P2,* 2150 
012737 000000G 000004G MOV ORCV .BUFFER, at “2 LIST+4 : 2151 
016637 000004 000006G MOV 4(SP),RCV. D.LIST ; Pl,* 2152 
005037 000010G CLR RCV .D.LIST+10 ; 2153 
005037 000012G CLR RCV.D.LIST+12 3 2154 
012737 100000 000014G MOV #-100000 .RCV.D.LIST+14 ; 2155 
012737 020000 000016G MOV #20000 ,RCV.D.LIST+16 ; 2156 
000207 RTS PC : 2130 
: Routine Size: 23 words, Routine Bese: ACSCODES + 3234 
+ Meximum steck depth per invocation: words J 


; 2159 1 


™ 

rors 

~“ 

~“ 
FPNMNNNNNNNNNN PPR RR RR RRR RR ei ee ee 


+ Routine Size: 





eee eee — lll Art. ca. i a a age 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55  VAX-11 Bliss-16 v4.1-S82 a 32! 
GLOBAL ROUTINE - SET_XDESCR_LIST ( P1, P2 ) 14-Mar-1985 13:06:01  DISK$USER2; [MARSHALL .DEGNA JZQNAG. BLI;4 (17) 
SSBTTL ‘GLOBAL ROUTINE - SET_XDESCR_LIST ( P1, P2 )' 


GLOBAL ROUTINE SET_XDESCR_LIST ( P1, P2 ) : NOVALUE = 


GLOBAL ROUTINE : SET_XDESCR_LIST 
DESCRIPTION: 

This routine initializes transmit descriptor list. 
INPUT PARAMETERS: 


Pil - expected Ethernet packet length in words 
P2 - expected XMIT Descriptor List settings 


BEGIN 
XMIT_D_LIST { FLGWD ] 
XMIT_DO_LIST { DBITS Jj 
XMIT_D_LIST { LOADR J 
XMIT_D_LIST { TWOL Jj .P1; 
XMIT_D_LIST { STWD1 ) 0; 
XMIT_D_LIST { STWD2 } 0; 
XMIT_D_LIST ({ DLINK ] V; 
XMIT_D_LIST { BSTAT } E; 
END; 
-SBTTL SET.XDESCR.LIST GLOBAL ROUTINE - SET_XDESCR_LIST ( Pi, P2 ) 
100000 000000G SET. XDESCR. LIST:: 
MOV #-100000 , XMIT.O.LIST : 2181 
000002 000002G MOV 2CSP),XMIT.O.LIST+2 ; P2,* 2182 
000004G MOV oXMIT .BUFFER, XMIT. . LIST+4 : 2183 
000004 000006G MOV 4(SP),XMIT.D.LIST+ ; Pl,* 2184 
000010G CLR XMIT .D.LIST+10 ; 2185 
000012G CLR XMIT.O.LIST+i12 : 2186 
100000 000014G MOV $-100000 , XMIT.D.LIST+14 ; 2187 
020000 000016G MOV #20000 , XMIT.D.LIST+16 ; 2188 
RTS PC ; 2162 
23 words, Routine Base: ACSCODE$ + 3312 


+ Maximum stack depth per invocation: 0O words 


: 2191 1 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 - 33 | 
GLOBAL ROUTINE - WALKING _BIT ( P1, P2, P3 ) 14-Mer-1985 13:06:01 DISK $SUSER2: (MARSHALL .DEQNAJZQNA4.BL1;4 (18) | 
SSBTTL ‘GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 )' 


GLOBAL ROUTINE WALKING_BIT ( Pi, P2, P3 ) : NOVALUE = 


— 


*?¢ 
GLOBAL ROUTINE : WALKING _BIT 
DESCRIPTION: 


’ 
' 
! 
5 
' 
' 
: This routine sets bit to 0 or 1 in a specified bit position of the 
Ethernet Station Address. For example, 

: if 

: -P1 = 0 end .P2 = 15 PS = 5 
' 

: 

: 

: 

: 

: 

: 

: 

: 

'. 


—_———— 


then i 
Ethernet Station Address = FF-FF-FF-FF-7F-FF 


INPUT PARAMETERS: 
Pi - bit € O or 1 ) 


P2 - bit position from base address 
P3 - # of bytes to be tested using this pattern 


BEGIN 
SELECTONE .P2 OF 
SET 
[ @-38 FT 3s 
| TEMP1 = O; 
{[ 8 TOC .P3+1)* 8): 
TEMPi = .P2 / 8; 
TES; 
TEMP2 = .P2 MOD 8; 
IF .Pi EQLU ZERO 
THEN 
BEGIN 


TBYTE1 = #B'00000000' ; 
— . TEMP2 OF 


S 

{0 J: TBYTES = #0'001'; 
{C1 ): TBYTES = #0'002'; 
{ 2]: TBYTES = #0'004'; 
{3 J]: TBYTES = #0'010'; 
[4]: TBYTES = #0'020'; 
C5 J]: TBYTES = #0'040'; 
{6 J]: TBYTES = #0'100'; 
fet ]}: TBYTES = #0'200' ; 


‘ 
A  — 





14 


i 
| ene CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 _ a 4! 
v01.0 GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 ) 14-Mar-1985 13:06:01 DISKS$USER2: (MARSHALL .DEQNA)ZQNA4. e1.4 ca) | 
; 2245 3 END 
$ 2246 2 ELSE 
; 2247 3 BEGIN 
PF 2248 3 TBYTE1 = #8'11111111'; 
; 2249 3 SELECTONE .TEMP2 OF 
; 2250 3 SET 
; 2251 3 { 0]: TBYTES = #0'376'; 
$ 2252 3 { 1): TBYTES = #80'375'; 
$ 2253 3 { 2): TBYTES = #£0'373'; 
; 2254 3 {3 ]): TBYTES = 8C’367'; 
5 2255 3 { 4]: TBYTES = #£0'357'; 
; 2256 3 {5 ): TBEYTES = #0'337'; 
$ 2257 3 { 6): TBYTES = #60'277'; 
3 2258 3 { 7 ): TBYTES = #0'177'; 
:; 2259 3 TES; 
; 2260 2 END ; 
$ 2261 2 
; 2262 2 INCR INDEX FROM O TO .P3 DO 
; 2263 2 TARGET_ADR [ .INDEX ]) = .TBYTE1; 
; 2264 2 
’ 2265 2 TEMPS = .P3 - .TEMPI; 
; 2266 2 TARGET_ADR [ .TEMP3 ) = .TBYTES; 
$ 2267 2 
; 2268 1 END; 
ig WALKING.BIT GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 ) 
000000 004137 000000G WALKING. BIT: 
JSR R1, $SAVE2 : 2194 
000004 016602 000012 MOV 12C(SP),R2 ; P2,* 2220 
000010 002406 BLT i$ ; 2222 
000012 020227 000007 CMP R2,07 
000016 003003 BGT i$ 
20 005037 000000G CLR TEMP ; 2223 
000024 000421 BR es ; 2220 
020227 000010 1$: CMP R2,%10 : 2224 
000032 002416 BLT 
000034 01 000010 MOV 10¢(SP),RO ; P3,* 
000040 072027 000003 ASH F 
062700 000010 ADD #10,R0 
000050 020200 CMP R2,RO0 
900052 003006 BGT 2s 
900054 010201 MOV R2,R1 ; 2225 
900056 006700 SXT 
900060 071027 000010 DIV #10,RO 
JOO0E 010037 000000G MOV RO, TEMP1 
900070 010201 2$: MOV R2,R1i ; 2228 
900072 006700 SXT RO 
900074 071027 000010 DIV #10,RO 
900100 010137 000000G MOV R1,TEMP2 
900104 010100 MOV R1,RO ; TEMP2,* 2234 
000106 005766 000014 TST 14(SP) ; Pl 2230 | 
900112 001071 BNE 10$ 


— ~~ a eee 


ee 


-— — <——- a eee eee eee ee ee eee nae er ee Sc St sist siensten-semisien aime ————— ee —— —- - - 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 eee” os 
GLOBAL ROUTINE - WALKING _ BIT ( Pi, P2, P3 ) 14-Mer-1985 13:06:01 DISK$USER2: : (MARSHALL . DEQNA )ZQNA4 ..BLI;4 ruth it 
005037 0000006 CLR TBYTE1 : 2233 
005700 TST RO 2236 
001004 BNE 3$ 
012737 000001 000000G MOV #1,TBYTES 
000552 BR 18$ ; 2234 | 
020027 000001 3$: CMP RO, #1 ; 2237 
001004 BNE 4$ 
012737 000002 000000G MOV #2, TBYTES 
000543 BR 18$ ; 2234 
020027 9000002 4$: CMP RO, #2 ; 2238 
001004 BNE 5$ 
012737 000004 000000G MOV #4, TBYTES 
000534 BR 18$ ; 2234 
020027 000003 5$: CMP RO, #3 : 2239 
001004 BNE 6$ 
012737 000010 000000G MOV #10, TBYTES 
000525 BR 18$ ; 2234 
020027 000004 6$: CMP RO, 04 : 2240 
001004 BNE 7$ 
012737 000020 000000G MOV #20, TBYTES 
000516 BR $ 2234 
020027 000005 7$: CMP #5 : 2241 
001004 BNE 
012737 000040 000000G MOV #40, TBYTES 
7 BR $ 3 2234 
poe 000006 8$: Ve a ; 2242 
012737 000100 000000G MOV #100, TBYTES 
000500 BR 18$ : 2234 
020027 000007 9$: CMP RO, 97 ; 2243 
001075 BNE 18$ 
012737 000200 000000G MOV #200, TEYTES 
000471 BR 18$ 3 2234 
012737 000377 000000G 10$: MOV #377, TBYTE1L . 2248 
005700 TST RO : 2251 
001004 BNE 11% 
012737 000376 000000G MOV #376, TBYTES 
BR 18¢ 3 2249 
020027 000001 i1$: CMP RO, #1 : 2252 
001004 BNE 12$ 
012737 000375 000000G MOV #375, TBYTES 
000451 BR 18$ ; 2249 
020027 000002 i2$: ae a" ; 2253 
012737 000373 000000G MOV #373, TBYTES 
000442 BR 18$ : 2249 
020027 000003 13$: CMP RO, #3 3 2254 
00 BNE 14% 
012737 000367 000000G MOV #367, TBYTES 
33 BR 18$ : 2249 
020027 000004 14$: CMP RO, 04 ; 2255 
001004 BNE 15$ | 
012737 000357 000000G MOV #357, TBYTES 


113760 
005200 
020066 
000500 003771 
016637 
s Routine Size: 
; Maximum stack 
; 2269 1 


re ee ee ee 


CZQNADO DEQNA FUNCTIONAL TEST 
ROUTINE - WALKING_BIT ( P1, P2, P3 ) 


GLOBAL 
000005 15%: 
000337 0000006 
000006 16$: 
000277 000000G 
000007 17$: 
000177 000000G 

18$: 
000000G 000000G 19%: 
000010 20$: 
000010 000000G 


000000G 000000G 


173 words . 
depth per invocation: 


Routine Base: 
4 words 


K4 


14-Mer-1985 13:18:55 
14-Mer-1985 13:06:01 


18$ 
RO, #5 


16$ 

#337, TBYTES 
18$ 

RO, #6 

17$ 

#277, TBYTES 
18% 

RO, #7 


18$ 
#177, TBYTES 
RO 


20$ 
eee 
RO, 10¢€SP) 

19$ 


10(SP), TEMPS 
TEMP1, TEMPS 
TEMPS 


»RO 
aes 


ACS$CODE$ + 3370 


eee 


———— =—— —— ee ———— TT ee ~ - -— 


| 








SEQ 0256 
VAX-11 Bliss-16 V4.1-582 Page 36° 
DISK$USER2: (MARSHALL .DEQNAJZQNA4.BLI;4 (18) | 
; 2249 
; 2256 
; 2249 
: 2257 | 
; 2249 | 
5 2256 | 
; INDEX 2262 
; *,*C INDEX) 2263 
; INDEX 
; INDEX,P3 
; 2194 


2262 

; P3,* 2265 

; 2266 
| 


owe. one 


ee - 
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SEQ 0257 


CZQ@NADO DEGNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 


p 
GLOBAL ROUTINE - WRI_STATION_ADR ( Pl, P2 ) 14-Mar-1985 13:06:01 DISK$USER2: {MARSHALL .DEQNA)ZQNA4.BLI:4~ 


SSBTTL ‘GLOBAL ROUTINE - WRI_STATION_ADR ( P1, P2 )' 
GLOBAL ROUTINE WRT _STATION_ADR ( P1, P2 }: NOVALUE = 


e 
s 


GLOBAL ROUTINE : WRT_STATION_ADR 
DESCRIPTION: 

This routine writes Station Address to XMiT_BUFFER. 
INPUT PARAMETERS: 


Pl - Ethernet Station Address index (1:14) in Station Address RAM 
P2 - Ethernet Station Address index ( 0:19 ) in the TARGET_ADR table 


BEGIN 
TEMP1 = .P2 « 6; 
SELECTONE .P1 OF 

SET 

8 Fd 

{ 8 TO 14 )}: 

TES; 
IF .TEMP2 EQLU ZERO 

THEN 

INCR INDEX FROM O TO 5 DO 
BEGIN 
XMIT_BUFFER { .INDEX ]) = .TARGET_ADR [ .INDEX + .TEMP1 ]}; 


TEMP2 = .Pi; 
TEMP2 = .Pi «+ 57; 


ELSE 
INCR INDEX FROM O 10 5 DO 
BEGIN 
TEMPS = .INDEX « 8 + .TEMP2; 
— { .TEMP3 ] = .TARGET_ADR { .INDEX + .TEMP1 ]; 
: 
END; 
-SBTTL WRT.STATION.ADR GLOBAL ROUTINE - WRT_STATION_ADR ( Pl, P2 ) 
WRT .STATION.ADR:: 

JSR Ri, $SAVE3 3 
MOV 12(SP),R1 ; P2,¢ 
MUL 66,R1 
MOV R1, TEMP) 
MOV 14(SP),RO ; Pls 


37 
(19) 


060300 
000140 010037 

010201 
000146 063701 
000152 116160 

005202 
000162 020227 
000166 003760 
000170 000207 
+ Routine Size: 
5 Meximum steck 


i 2334 1 


CZQ@NADO DEGNA FUNCTIONAL TEST 


GLOBAL ROUTINE - WRT_STATION_ADR ( P1, P2 ) 


000007 


61 words, 


depth per invocetion: 


is: 


2s: 


3$: 


4s: 
5%: 


RO,R1 
TEMP 1 
TARGE 
RO 


R2 
TEMP1 .R1 
TARGET . ADRCR1), XMIT.BUFFERCRO) 


R2 
R2,05 
S$ 
PC 


Routine Base: ACSCODES + 4122 
5 words 


14-Mer-1985 13:18:55 
14-Mer-1985 13:06:01 


»R1 
T. ADRCR1), XMIT.BUFFERCRO) 


VAX-11 Cliss-16 V4.1-582 age 
DISK SUSER2: [MARSHALL . DEQNA )ZQNA4 .BLI;4 


INDEX 
INDEX, ¢ 


«, eC INDEX) 
INDEX 


INDEX, 


INDEX 
INDEX, ¢ 


INDEX, 


INDEX 
INDEX, + 


— — 


SEQ 0258 
Pp 


38 
(19) 

2295 | 
2296 


2293 
2297 





F000 00 80 68 8 ED 0 RD 0 0 PROD RD ee ee ee ee ee te ee 


ee ee sO eet oe 


N4 


14-Mer-1985 13:18:55 
14-Mer-1985 13:06:01 


CZQGNADO DEGNA FUNCTIONAL TEST VAX-11 Bliss-16 V4.1-582 


GLOBAL ROUTINE - PREP_FOR_SETUP ( ) 
SSBTTL ‘GLOBAL ROUTINE - PREP_FOR_SETUP ( ) ' 
GLOBAL ROUTINE PREP_FOR_SETUP : NOVALUE = 


e 
e 


GLOBAL ROUTINE : PREP _FOR_SETUP 


DESCRIPTION: 
This routine retrives Ethernet Stetion Address from the Ethernet's 
Stetion Address PROM, seves copy of Ethernet Station Address PROM 


in the TARGET_ADR vector, initializes transmit end receive buffers 
to zero end finally sets buffer length to select promiscuous mode. 


INPUT PARAMETERS: 


oS 8 Oe OS 8 Oe Oe SO OS OO Gee Oe Ce Se Oe 


none 
BEGIN 
fee 
! py Pn ETHERNET PHYSICAL STATION ADDRESS AND SAVE A COPY OF IT IN THE 
} ARGET_ADR‘ VECTOR. 


ee ~ ae FROM O T0 5 DO 
TBYTE1 = .REG ‘eo { . INDEX, ST_ADDR ]; 


TARGET _ADR { € PHA “INDEX *6)-. “INDEX ]) = .TBYTE1; 
END; 
CLR_BUFFERS ( 256 ); 
END; 
-SBTTL PREP.FOR.SETUP GLOBAL ROUTINE - PREP_FOR_SETUP ( ) 
PREP .FOR. SETUP: : 
MOV R1,-CSP) ; 
TST -(SP) 
CLR R1i 3; INDEX 
i$ MOV R1,RO ; INDEX,+* 
ASL RO 
000000G ADD REG. ADR ,RO 
MOV CRO). CSP) 3 *,T7MP.LOCATION 
000000G CLR TBYTE1 
000000G MOVB (SP), TBYTE1 
000162G MOVB (SP), TARGET .ADR+162(R1 ) ; *,*C INDEX) 
INC Ri ; INDEX 
000005 CMP R1,85 ; INDEX,* 
BLE 1 


nina 
DISK$USER2: [MARSHALL .DEQNA]JZQNA4.BLI;4~ 


39 
(20) 


2317 


2342 
2344 


2345 
2342 


——_— -—- —~ 








SEQ Neg = 
ZQNA4 CZQNADO DEGNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 


vo1.0 GLOBAL ROUTINE - PREP_FOR_SETUP ( ) 14-Mer-1985 13:06:01 DISK$USER2: : (MARSHALL . DEQNA )ZQNA4. eur,2 (20) 
000044 012746 000400 MOV #400, -( SP) $ 2348 
000050 004737 001234’ JSR PC ,CLR. BUFFERS 

000054 022626 CMP CSP )+,CSP)- 3 2317 
000056 012601 MOV (SP)+,R1 

000060 000207 RTS PC 

; Routine Size: 25 words, Routine Bese: ACSCODE$ + 4314 

; Maximum steck depth per invocetion: 4 words 


POO OY 8 8 8 8 8 GERD ROO. GE 8 G9 0.0.0 0. 0. 10. 0 0 ee eee ee he ee en 


. ——e—_ _—<—— a © 


ee oe ee ee ee ee eee ll 





CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 § VAX-11 Bliss-16 V4.1-582 ow 41! 
(21) 


GLOBAL ROUTINE - FORM_HEX_ADR ( P3 ) 14-Mer-1985 13:06:01 DISK $USER2: [MARSHALL . DEQNA)ZQNA4 .BLI;4 
SSBTTL ‘GLOBAL ROUTINE - FORM_HEX_ADR ( P3 ) ' 


GLOBAL ROUTINE FORM_HEX_ADR ( P3 ) : NOVALUE = 


+ 
a 


GLOBAL ROUTINE : FORM_HEX_ADR 
DESCRIPTION: 


This routine retrives Ethernet Station Address from the Ethernet's 
Station Address PROM, saves its copy in the TARGET_ADR vector. 


INPUT PARAMETERS: 
P3 - Index to Station Address in the TARGET_ADR vector 


BEGIN 


See 


RETRIEVE ETHERNET PHYSICAL STATION ADDRESS AND SAVE A COPY OF IT IN THE 
‘TARGET_ADR' AND ‘STATION_ADR‘' VECTORS. 


IF .P3 EQLU ZERO 
THEN 


TEMPS = 0 
ELSE 
TEMPS = .P3 * 6; 


INCR INDEXS FROM O TO 5 DO 
BEGIN 


TBYTE1 = .REG_ADR { .INDEXS, ST_ADOR ); 
TARGET_ADR { (€ PHA_INDEX * 6 ) + .INDEXS ) = .TBYTE1; 


END; 
COUNTER = ZERO; 
INCR INDEXS FROM 0 TO 5 BY 2 DO 
Tere . oo se { . TEMPS + .INDEXS ); 


TEMP2 = .TARGET_ADR { .TEMPS + .INDEXS + 1 J]; 
STATION_ADR [ .COUNTER ] = .TEMP1 OR ( .TEMP2 AND #0'000377' ); 


’ oe 
—— ete me 8 - eee eee Re A TE TL LT ET ELS I, A 


N 

& 

us] 

w 
FPNMNUHSSHSSPSS&SUUNUUUUUUIUIU ® auUUWNNMNNNND 


DS 


14-Mer-1985 13:18:55 


CZQNADO DEQNA FUNCTIONAL TEST 
14-Mer-1985 13:06:01 


GLOBAL ROUTINE - FORM_HEX_ADR ( P3 ) 


6 
< 


= 6C's'; 


DECR INDEX1 FROM 2 TO 0 DO 
BEGIN 


TEMPS = .STATION_ADR [ .INDEX1 ]; 
————— FROM O TO 1 DO 


INCR INDEXS FROM O TO 1 DO 
BEGIN 


TEMP1 = . TEMPS AND #X'F’; 
al sali LEQU DECIMAL‘ 9' 


aa = 6C’'O' + .TEMP1 
TBYTE1 = #sC‘A’ + ( .TEMP1 - SDECIMAL‘'10' ); 
PHYS_ADR { .COUNTER ] = .TBYTE1; 
COUNTER = .COUNTER - 1; 
TEMPS = .TEMP3S t ( -4 ); 
END; 
IF .COUNTER GTRU 2 
THEN 
PHYS_ADR { .COUNTER ]) = sC’-'; 


COUNTER = .COUNTER - 1; 


END; 
END; 
END; 
.SBTTL FORM.HEX.ADR GLOBAL ROUTINE - FORM_HEX_ADR ( P3 ) 
000000G FORM.HEX. 2: 
JSR Ri, $SAVES 5 
TST -(SP) 
000014 MOV 14(SP),RO ; P3,* 
BNE i$ 
000000G CLR TEMPS 5 
BR e$ ; 
i$: MOV RO,Ri ; 
000006 MUL $6 ,R 
000000G MOV R1, TEMPS 
2$: CLR RO ; INDEXS 
3$: MOV RO,R1 ; INDEXS,= 
ADD «REG. ADR, RA 
000000G ; P 
MOV CR1),CSP) ; *,TMP.LOCATION 
000000G CLR TBYTE1 





SE — --=- — — 


SEQ 0262 


VAX-11 Bliss-16 v4.1-582 Page 42! 
DISK$USER2: (MARSHALL .DEQNAJZQNA4.BL1:4 (21)! 


2356 
2379 
2381 
2379 
. 2383 
2385 
2387 
| 





_ — —— 


ES 


SEQ 
VAX-11 Bliss-16 V4.1-S582 Ny 43! 





CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 
GLOBAL ROUTINE - FORM_HEX_ADR ( P3 ) 14-Mer-1985 13:06:01 DISK$USER2: [MARSHALL . DEQNA }ZQNA4 . BLI Sa. (21) 
111637 000000G MOVB (SP), TBYTE1 
111660 000162G MOVvB (SP), TARGET . ADR+162(RO) ; *,*C INDEXS) 2388 
005200 INC RO ; INDEXS 2385 
020027 000005 CMP RO, #5 ; INDEXS,+« 
003761 BLE 3% 
37 000000G CLR COUNTER 3 2391 
005002 CLR aed ; INDEXS 2393 
010201 4$: MOV R2,R1 ; INDEXS,+« 2395 
063701 000000G ADD TEMPS ,R1i 
116137 000000G MOVB TARGET . ADRCR1), TEMP1 
1050 000001G CLRB TEMP1i+1 
013700 MOV TEMP1 "RO ; 2396 
07 000010 ASH #10,RO 
010037 MOV RO, TEMP 
116137 000001G 000000G MOVB TARGET. ADR+1(R1), TEMP2 : 2397 
050 0000016 CLRB TEMP2+ 
013701 MOV COUNTER ,R1 ; 2398 
1 ASL Ri 
CLR RO 
153700 000000G BISB TEMP2 ,RO 
053700 000000G BIS TEMP1 RO 
010061 000000G MOV RO, STATION. ADRCR1) 
005237 000000G INC COUNTER ; 2399 
062702 000002 ADD #2,R2 ; *, INDEXS 2393 
020227 000005 CMP R2,¢5 ; INDEXS,+* 
003734 BLE 4$ 
012737 000022 000000G MOV #22 , COUNTER ; 2406 
112737 000045 0000006 MOVB 645, S.ADR ; 2407 
112737 000101 000001G MOVE #101 ,PHYS.ADR+1 ; 2408 
112737 000040 000023G MOVB $40 , PHYS .ADR+23 ; 2409 
112737 000045 0000246 MOVB 045 ,,PHYS .ADR+24 ; 2410 
112737 000116 000025G MOVB 0116,PHYS. ADR+25 ; 2411 
012701 000004 MOV 04 ,R1 ; *,INDEX1 2413 
016137 000000G 000000G 5$: MOV STATION. ADRCR1), TEMPS ; *CINDEX1),* 2415 
012703 000002 MOV #2,R3 ; *, INDEX2 2416 
012702 900002 6$: MOV #2,R2 ; *, INDEX3 2418 
013737 000000G 7$: MOV TEMPS, TEMP1 3 2420 
042737 177760 000000G BIC #177760, TEMP1 
013700 MOV TEMP1,RO 3 2421 
7 000011 CMP RO, #11 
101006 BHI 8$ 
010037 000000G MOV RO, TBYTE1 ; 2423 
062737 000060 000000G ADO #60, TBYTE1 
000405 BR 9$ ; 2421 
010037 8$: MOV RO, TBYTE1 : 2425 
737 000067 000000G ADD #67, TBYTE1 
013700 000000G 93: MOV COUNTER ,RO : 2426 
113760 000000G 000000G MOVB TBYTE1,PHYS.ADRCRO) 
005337 000000G DEC COUNTER ; 2427 
013700 000000G MOV TEMP3,RO : 2428 
072027 177774 ASH #-4,RO 
010037 MOV RO, TEMPS 
077244 SOB R2,7$ ; INDEX3,* 2418 


—_—— —  — ae 
* . 


; Routine Size: 


Po 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 
GLOBAL ROUTINE - FORM_HEX_ADR ( P3 ) 14-Mar-1985 13:06:01 
000000G MOV COUNTER ,R2 
000002 CMP R2,%2 

BLOS 10% 
000055 000000G MOVB #55,PHYS.ADRCR2) 

10$: DEC COUNTER 

SOB R3,6$ 
000002 SUB #2,R1 

BPL S$ 

TST (SP + 

RTS PC 


148 words, 


Routine Base: ACSCODE$ + 4376 


; Maximum stack depth per invocation: 6 words 


3 2441 1 
; 2442 i 





SS rr ee ee | ee ee ae eee ———— 


SEQ 0264 

VAX-11 Bliss-16 V4.i-582 Page 

DISK $USER2: : (MARSHALL . DEQNA JZQNA4. BLI;4> (21) 
$ 2431 
; 2433 
; 2435 | 
; INDEX2, « 2416 

; *,INDEX1 2413 
; 2356 


yy 
os 
~ 
= 
POOR PO OPO FEE ED POD ROD PO DDI eee eee eee ee ee ee ee be be pe 


——— <— = ee 
- | 


Oe LE ER ee 


GS 


CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 
GLOBAL ROUTINE - XMIT_SETUP_PACKET ( Pi ) 14-Mar-1985 13:06:01 


SSBTTL ‘GLOBAL ROUTINE - XMIT_SETUP_PACKET ( Pi )’ 





LS | ee ee — - 


SEQ 0265 
VAX-11 Bliss-16 V4.1-582 Page 45 
DISK$USER2: [MARSHALL .DEQNAJZQNA4.BL1I:4 (22) 


GLOBAL ROUTINE XMIT_SETUP_PACKET ( P1 ) : NOVALUE = 

See 

t 

GLOBAL ROUTINE : XMIT_SETUP_PACKET 

DESCRIPTION: 

‘ This routine initializes descriptor lists to transmit and receive 
H uncheined Setup loopback packet. After loopback packet has been 

H received DEQNA CSR, transmit and receive status registers are 

: checked for proper status. Finally, transmit and receive packets 
H are compared to verify that they are identical. 

i 

: XMIT_D_LIST { 0 ] = NEWB RCV_D_LIST { 0 ] = NEWB 

: XMIT_D_LIST { 1 ] = VSE RCV_D_LIST ( 1 ] = VE 

: XMIT_D_LIST ( 2 ] = XMIT_BUFFER RCV_D_LIST ({ 2 ] = RCV_BUFFER 
! XMIT_D_LIST { 3 ]) = .XBUF_LENGTH RCV_D_LIST ({ 3 ] = .XBUF_LENGTH 
! XMIT_D_LIST [ 4] = 0 RCV_D_LIST [4] = 0 

: XMIT_D_LIST [5 J] = 0 RCV_D_LIST [5 ])=0 

! XMIT_D_LIST [6] = V RCV_D_LIST [6 J) = V 

: XMIT_D_LIST [7] =€E RCV_D_LIST [ 7]J)=€E 

i] 

a 

! INPUT PARAMETERS: 

a 

. Pl - transmit buffer length in bytes 

a 

'-- 

BEGIN 

CLR_DESCR C( ); 

RBUF _LENGTH = .P1; 


“LENGTH = - ( .RBUF_LENGTH t -1 ); 
SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
SET_XDESCR_LIST ( .XBUF_LENGTH, VSE ); 


IF .P1 EQLU A_MODE 
THEN 


BEGIN 
XBUF_LENGTH = - ( (¢ 
SET_XDESCR_LIST ( . 
SET_RDESCR_LIST ¢ 
END; 


XMIT_AND_RCV_PACKET ( ); 


-RBUF_LENGTH ft -1 ) + 1 ); 
XBUF _LENGTH, VSEL ); 
-XBUF_LENGTH, VE ); 


tee 


! COMPARE STATUS REGISTERS TO EXPECTED VALUES 
'.. 


— ee eee 


| 
| 
| 


-—- 


wr | eee eT TS TNR = A TS A SR 


: 





CZQ@NADO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - XMIT_SETUP_PACKET ( P1 ) 





H5 


14-Mar-1985 13:18:55 
14-Mar-1985 13:06:01 


VAX-11 Bliss-16 V4.1-582 


; 2496 2 
$ 2497 2 CHK_RIXI_STATUS ( ONE ); 
: 2498 2 CHK_CSR_STATUS ( CSR _STATUS, CSR_MASK ); ! 0'100220', 0'100220' 
$ 2499 : CHK _ _RCV_ STATUS ( RFLG_ STATUS, RWD1 “STATUS ); ! 0'140000' , 0'020000' 
$ 2500 
‘ 2501 2 TEMP1 = XWD12_STATUS; ! 0'000400' 
; 2502 2 IF .XMIT_D_LIST [{ STE16 ) 
; 2503 2 THEN 
$ 2504 2 TEMP1 = '002400' ; 
; 2505 : CHK_XMIT_STATUS (€ XFLG_STATUS, .TEMP1 ); ! 0'140000' , 7777777 
$ 2506 
$ 2507 2 COMPARE _PACKETS ( ); 
; 2508 2 
3 2509 1 END; 
. SBTTL XMIT. SETUP .PACKET GLOBAL ROUTINE - XMIT_SETUP_PACKET ( Pi ) 
000000 004737 001206’ XMIT. SETUP. PACKET: 
JSR PC, CLR. DESCR 

000004 016637 000002 000000G MOV 2(SP), RBUF .LENGTH ; Pi,* 
000012 016600 000002 MOV 2(SP).RO ; RBUF .LENGTH, « 
000016 006200 ASR RO 
000020 005400 NEG RO 
000022 010037 000000G MOV RO, XBUF .LENGTH 
000026 010046 MOV RO, -CSP) ; XBUF .LENGTH, * 
000030 012746 1 MOV #-60000, -( SP) 
000034 004737 003234’ JSR PC,SET.RDESCR.LIST 
000040 013716 MOV XBUF .LENGTH, (SP) ; 
000044 012746 1 MOV #-50000, - (SP) 
000050 737 003312’ JSR PC,SET. XDESCR. LIST 
000054 026627 000010 000201 CMP 10€SP), #20 ; Pl,* 
000062 001023 BNE i$ 
000064 013700 000000G MOV RBUF .LENGTH,RO ' : 
000070 006200 ASR RO 
000072 005200 INC RO 
000074 5400 NEG RO 
000076 010037 000000G MOV RO, XBUF .LENGTH 
000102 010016 MOV RO, (SP) ; XBUF .LENGTH, « 
000104 012746 130200 MOV #-47600, -(SP) 
000110 004737 003312’ JSR PC,SET.XDESCR.LIST 
000114 013716 MOV XBUF .LENGTH, (CSP) ; 
000120 012746 120000 MOV #-60000, -(SP) 
000124 004737 003234’ JSR PC,SET. RDESCR. LIST 

130 022626 CMP (SP)+, (SP )+ ; 

132 004737 dO00000V i$: JSR PC, XMIT.AND.RCV.PACKET : 

136 012716 000001 MOV #1,(SP) : 

142 004737 001262’ JSR PC ,CHK .RIXI.STATUS 

146 012716 100220 MOV #-77560, (SP) ; 

iS2 011646 MOV (SP),-CSP) 

i154 004737 001646’ JSR PC ,CHK.CSR.STATUS 

160 012716 140000 MOV #-40000 , (SP) : 

164 012746 020000 MOV #20000, -( SP) 

170 004737 002336' JSR PC,CHK.RCV.STATUS 





DISK$USER2: [MARSHALL . DEQNA JZQNAG. BLI;4> (22 


SEQ — . 
Page 


2477 
2478 
2479 


2480 


2481 


2483 
2486 


2487 


2488 


2485 
2491 
2497 


2498 


2499 


: Routine Size: 
; Maximum steck 


$ 2510 
; 2511 


012737 


1 
1 


— —— — TT ee ee 


CZQNADO DEQNA FUNCTIONAL TEST 


BEQ 
MOV 
MOV 
MOV 
JSR 
JSR 
ADD 
RTS 





IS 


14-Mer-1985 13:18:55 
14-Mar-1985 13:06:01 


#400, TEMP1 
#2000, XMIT.D.LIST+10 


PC, COMPARE . PACKETS 
ae 


ACSCODE$ + 5046 


GLOBAL ROUTINE - XMIT_SETUP_PACKET ( Pi ) 
000400 000000G 
002000 000010G 
002400 000000G 
140000 2$: 
000000G 
002040’ 
002616’ 
000014 
83 words, Routine Base: 
depth per invocation: 7 words 


VAX-11 Bliss-16 V4.1-582 


wees? 
DISK$USER2: [MARSHALL . DEQNA)ZQNA4.BLI;4 222) | 


2501 
2502 


= 
8 EERO 8 8 CEO FD PO PD RO PO DD DD DDD DD ee eee eee eee eee ee ee ee eee pe 


——— << ~ 


- — ee ee 


ZQNADO DEQNA FUNCTIONAL TEST 


Cc 
GLOBAL ROUTINE - SEND_ELOOP_PACKET ( P3 ) 





JS 


14-Mar-1985 13:18:55 
14-Mar-1985 13:06:01 


SSBTTL ‘GLOBAL ROUTINE - SEND_ELOOP_PACKET ( P3 ) ' 
GLOBAL ROUTINE SEND_ELOOP_PACKET ( P3 ) 


GLOBAL ROUTINE : 
DESCRIPTION: 


SEND_ELOOP_PACKET 


: NOVALUE = 


This routine initializes transmit and receive descriptor lists and 
then initiates trensmissin of a loopback packet. After 

loopback pecket is received DEQNA CSR, transmit and receive status r 
egisters ere checked for proper status. Finally, transmit and receive 
peckets are compared to verify that they are identical. 


VE 
XMIT_BUFFER 
. XBUF __LENGTH 


Se 

: 

' 

' 

‘ 

i 

' 

' 

' 

‘ 

‘ 

: 
XMIT_D_LIST 
XMIT_D_LIST 
' 
' 
' 
' 
‘ 
: 
, 
' 
‘ 
1. 


XMIT_D_LIST 


INPUT PARAMETERS: 


P3 - 


BEGIN 


(een Keen on Kaen Lats enn aaa 
NOUS WP o> 


Breet Lanet bead het beemed bead bed bead 


m<oo 


PUT_BIT € CSR, LB, INX_LOOPBACK ); 
XMIT_AND_RCV_PACKET ( ); 


RCV_D_LIST 


RCV_D_LIST 


tee 
' COMPARE STATUS REGISTERS TO EXPECTED VALUES 


CHK_RIXI_STATUS ( ZERO ); 


CHK_CSR_STATUS ( CSR_ STATUS, CSR_MASK ); 
CHK_XMIT_STATUS ( XFLG_ STATUS, xWO12_ STATUS d: 


IF .P3 EQLU ZERO 
THEN 


BEGIN 
. CHK_RCV_STATUS ( RFLG_STATUS, RWD1_STATUS ); 


ELSE 
BEGIN 


TEMP1 = RWD14_STATUS; 


IF .RCV_D_LIST { STWD1 ) AND #0'070001' 


( 
f 
( 
( 
f 
[ 
C 


0 ] = NEWB 

1 j= VE 

2 ] = RCV_BUFFER 

3 J] = .XBUF_LENGTH 
4])=0 

5 J])=0 

6) V 

ie ee 


! 0'100220', 0'100220' 
! 0’°140000' , 0'000400' 


! 0'140000' , 0'020000' 


! 0'060000' 


EQLU #0'070001' 


VAX-11 Bliss-16 V4.1-582 Page 
DISK$USER2: [MARSHALL . DEQNA)ZQNA4.BLI;4 


SEQ 0268 


i 
' 
' 


48 
(23)! 


—— <r ee ee eee —— <a 


KS é | 


SEQ 0269 9 | 


—— i. i, it a ee ae 


| ZQNA4 CZQNADO DEQNA FUNCTIONAL TEST 


| 14-Mar-1985 13:18:55  VAX-11 Bliss-16 V4.1-S82 Page 

v01.0 GLOBAL ROUTINE - SEND_ELOOP_PACKET ( P3 ) 14-Mar-1985 13:06:01  DISK$USER2: (MARSHALL .DEQNAJZQNA4.BLI;4~ (23) | 
j 

$ 2565 3 THEN | 
; 2566 3 TEMP1 = #0'070001' 
1 2567 3 CHK_RCV_STATUS ( RFLG STATUS, .TEMPi ); ! 0'140000', 777777 | 
; 2568 2 ; 
; 2569 1 END; 


000000 013700 000000G 


+; Routine Size: 51 words, 


; 2570 1 


Routine Bese: 
; Maximum steck depth per invocation: 5 words 


ACSCODE$ + 5314 


-SBTTL SEND.ELOOP.PACKET GLOBAL ROUTINE - SEND_ELOOP_PACKET ( P3 ) 
SEND. -ELOOP “PACKET: : 


| 
; 
REG. ADR, RO ; 2545 
000004 042760 001400 000016 BIC #1400, 16(RO) 
©00012 052760 001000 000016 BIS #1000, 16(RO) 
000020 004737 O00000V JSR PC,XMIT.AND.RCV.PACKET ; 2546 
000024 005046 CLR - (SP) ; 2552 
000026 004737 001262’ JSR PC,CHK .RIXI.STATUS 
000032 012716 190220 MOV #-77560, (SP) ; 2553 
000036 011646 MOV (SP),-CSP) 
000040 004737 001646’ JSR PC, CHK.CSR.STATUS 
000044 012716 140000 MOV #-40000, (SP) ; 2554 
000050 012746 MOV #400, -(SP) 
000054 004737 002040’ JSR PC,CHK.XMIT.STATUS 
000060 005766 000010 TST 10( SP) 3 PS 2556 
000064 001 BNE i$ 
000066 012716 140000 MOV #-40000 , (SP) ; 2559 
000072 012746 020000 MOV #20000 , -( SP) 
000076 000416 BR 3$ 
000100 0127357 060000 1$ MOV #60000, TEMP 1 ; 2563 
000106 032737 000001 000010G BIT #1,RCV.D0.LIST+10 5 2564 
000114 1403 BEQ 2$ 
000116 012737 970001 000000G MOV #70001 , TEMP i ; 2566 
000124 012716 140000 2s MOV #-40000, (SP) ; 2567 
000130 013746 MOV TEMP1,-(SP) 
000134 004737 002336’ 3$ JSR PC CHK .RCV.STATUS 
000140 062706 000010 ADD 2 SP ; 2543 
000144 000207 RTS 3 2514 


PROG G8 8 EP ODD A ee eee ee eee ee ee ee ee ee 


CZQ@NADO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - SEMD_TEST_PACKET 


— _- -— —_-"-—__- —_ ._—- - 


LS 


SEQ 0270 


14-Mer-1985 13:18:55 VAX-11 Bliss-16 V4.1-582 


SSBTTL ‘GLOBAL ROUTINE - SEND_TEST_PACKET ° 
GLOBAL ROUTINE SEND_TEST_PACKET : NOVALUE = 


° 
= 


GLOBAL ROUTINE : 
DESCRIPTION: 


SEND_TES1_PACKET 


This routine initializes trensmit end receive descriptor lists and 
then initietes transmissin of en external loopbeck packet. 


XMIT_O_LIST 


XMIT_O_LIST 
XMIT_D_LIST 


INPUT PARAMETERS: 
None 


SL OD OD OD CD OS CP OD FD CD CaP CD CO Cee See Se Oe Dee Oe Se See Se 
fond 
~< 
i] 
© 
i] 
as 
bet 
Fa) 
~4 


BEGIN 


! WRITE ETHERNET 


RESET_DEQNA ( ); 


INCR INDEX FROM O 
BEGIN 
XMIT_BUFFER [ 
XMIT_BUFFER [ 
END; 


XMIT_BUFFER [ PKT_ 
XMIT_BUFFER [ PKT_ 
XMIT_BUFFER [ PKT_ 


{0 ] = NEWB RCV_O_LIST ( O ] = NEWB 

(1) = VE RCV_D_LIST ({ 1 ) = VE 

{ 2 }) = XMIT_BUFFER RCV_O_LIST { 2 ] = RCV_BUFFER 
{3 ] = .XBUF_LENGTH RCV_D_LIST ( 3 ) = .XBUF_LENGTH 
(4]=0 RCV_D_LIST (4) = 0 

{S]=0 RCV_O_LIST (5) = 0 

(6) Vv RCV_DO_LIST [61] = V 

(7J)2#€ RCV_O_LIST( 7) 2€E 


STATION ADDRESS AND DATA PATTERN INTO THE TRANSMIT BUFFER 


TO 5 DO 


INDEX ] * .TARGET_ADR [ ( PHA_INDEX *« 6 ) + .INDEX J; 
-INDEX + 6 ] = .TARGET_ADR [ ( PHA_INDEX * 6 ) + . INDEX ]; 


TYPE ) = LPB_PKT; 
TYPE + 1 }) = SKIP_CNT; 
TYPE «+ 2 }) = RFC; 


! CONVERT SETUP PACKET SIZE FROM BYTE COUNT TO WORD COUNT AND SET UP 
! DESCRIPTOR LISTS 


RBUF _LENGTH = PKT_ 


XBUF _LENGTH = - ( 


LENGTH «+ 14; 
.RBUF LENGTH tf -1 ); 


Pp 
14-Mer-1985 13:06:01 DISK$USER2: [MARSHALL .DEQNA)ZQNA4.BLI;4> 


50 
(24) 


MS 


SEQ 0271 











ZQNA4 CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55 VAX-11 Bliss-16 v4.1-S82 P 
v01.0 GLOBAL ROUTINE - SEND_TEST_PACKET 14-Mer-1985 13:06:01 DISK $USER2: (MARSHAL. .DEQNA)ZQNAS.BLI;8° (24> 
| 2624 2 
+ 2625 2 SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
(ts 2626 2 SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
| 2627 2 
4 2626 2 See 
i! 2629 2 ! SET DEQNA TO EXTERNAL LOOPBACK MODE AND SEND LOOPBACK PACKET 
’ t.. 
’ 2631 2 
: a 2 PUT_BIT ( CSR, LB, EXT_LOOPBACK ); 
3 2633 2 XMIT_AND_RCV_ PACKET ( ); 
t 2634 2 
s 2635 1 END; 
.SBTTL SEND. TEST.PACKET GLOBAL ROUTINE - SEND_TEST_PACKET 
000000 004737 000324’ SEND. TEST .PACKET: : 
JSR PC RESET .DEQNA : 2605 
000004 005000 CLR RO ; INDEX 2607 
000006 116060 000162G 000000G 1$: MOVE TARGET .ADR+-162( RO), XMIT. settings 3 
eC INDEX), «( INDEX) 2609 
000014 116060 000162G 000006G MOVE TARGET .ADR-162( RO), XMIT. BUFFER -6(R0) ae 
; (I Xx), eC INDEX) re) 
000022 005200 INC —_ RO ; INDEX pao 
000024 020027 000005 CMP RO, 85 ; INDEX,« 
000030 003766 BLE is 
000032 112737 000220 000014G Move 0220, XMIT .BUFFER-14 ; 2613 
000040 105037 00001 CLAB XMIT .BUFFER+-15 ; 2614 
060044 112737 000001 000016G MOVE 01. xMIT.GUFFER-16 ; 2615 
000052 012737 002752 000000G MOV 02752 .RBUF .LENGTH ; 2622 
000060 012700 002752 MOV ; 2623 
000064 ASR 
000066 NEG 
000070 010037 000000G MOV RO, XBUF .LENGTH 
000074 010046 MOV RO. -( SP) ; XBUF .LENGTH, e 2625 
000076 012746 120000 MOV @-60000,. -( SP) 
000102 004737 003234‘ JSR PC ,SET.RDESCR.LIST 
000106 013716 MOV XBUF .LENGTH, (SP) ; | 2626 
0001i2 012746 MOV @-60000, -( SP) 
116 004737 00312‘ JSR PC,.SET.XDESCR.LIST 
122 013700 000000G MOV REG. ADR, RO : 7632 
000126 052760 001400 000016 BIS 61 »16(RO) 
134 006737 0O00000V JSR PC. XMIT. AND .RCV. PACKET ; 2633 
140 062706 000006 ADO 06, SP ; 2599 
144 000207 RTS PC ; 2573 
: Routine Size: 51 words, Routine Bese: ACSCODES - 5462 


1 Meximum steck depth per invocetion: 4 words 


NS 


ZQNAG CZQNADO DEQNA FUNCTIONAL TEST 14-Mer-1985 13:18:55  VAX-11 Bliss-16 v4.1- wey 
v0O1.0 GLOBAL ROUTINE - XMIT_AND_RCV_PACKET 14-Mer-1985 13:06:01 DISK SUSER2; [MARSHALL DEQNAJZONAG.BLI g 8c 205 
sy aes? : SSBTTL ‘GLOBAL ROUTINE - XMIT_AND_RCV_PACKET ° 
i 4 

; pores : GLOBAL ROUTINE XMIT_AND_RCV_PACKET : NOVALUE = 

5 

| 2641 1 feos 

s 2642 1 H 

' 2643 1 $ GLOBAL ROUTINE : XMIT_AND_RCV_PACKET 

i 2644 |i : 

s 2645 1 § DESCRIPTION: 

i 2646 1 ! 
; ee : ; This routine initiates transmit end receive operations. i 
: 
s 2649 1 ! INPUT PARAMETERS: 
; 2650 1 ! 

' 2651 1 H 

i 2652 1 H 

' 2653 1 H 

’ 2654 1 }-- 

’ 2655 1 

i 26 2 BEGIN 

i 2657 2 

' 26 é IOP_TABLE [{ RLO_ADR ) = RCV_D_LIST; 
' 2659 2 IOP_TABLE [ RHI_ADR ) = O; 

i 2660 2 

' 2661 2 .IOP_TABLE ({ XLO_ADR ) = XMIT_D_LIST; 

' 2662 2 IOP_TABLE [{ XHI_ADR ]} = O; 

j 2663 2 

i 2664 1 END; 

-SBTTL XMIT.AND.RCV.PACKET AL R * 
000000 012777 000000G 000004G apie ecto ee ee ee 
V V.O0.LIST,@IOP. TABLE +4 

000006 005077 000006G CLR @IOP . TABLE +6 oese 
000012 012777 000000G 000010G MOV @#XMIT.O.LIST,@IOP.TABLE+10 : 2661 
000020 005077 000012G CLR @IOP . TABLE +12 : 2662 
000024 000207 RTS PC ; 2639 
1 Routine Size: 11 words, Routine Bese: ACSCODE$ + 5630 

+ Maximum eteck depth per invocation: O words 

‘ 2665 1 

' 2666 1 





en ee ae 





SEQ 0273 
CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:18:55  VAX-11 Bliss-16 V4.1-582 
GLOBAL ROUTINE - XMIT_ILOOP PACKET ( P3 ) 14-Mer-1985 13:06:01  DISK$USER2: [MARSHALL .DEQNA)ZONAS. axe (28) 
i SSBTTL ‘GLOBAL ROUTINE - XMIT_ILOOP_PACKET ( P3 ) ° 
i GLOBAL ROUTINE XMIT_ILOOP_PACKET ( P3 ) : NOVALUE = 
1 See 
i ' 
i ! GLOBAL ROUTINE : XMIT_ILOOP_PACKET | 
1 : CESCRIPTION: 
: This routine 
: INPUT PARAMETERS: 
P3 - selector . 
i '.- 
i 
2 BEGIN 
: CLR_DESCR ( ); 
2 SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
Z SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
: XMIT_AND_RCV_PACKET ( ); 
2 .IOP_TABLE { CSR } = EENABLE; 
2 IF .P3 EQLU ONE 
2 THEN 
3 BEGIN 
3 CHK_RIXI_STATUS ( ONE ); 
3 CHK-CSR_STATUS ( CSR_STATUS, CSR_MASK ); ' 0'100220', 0'100220° 
3 CHKRCV_STATUS ( RFLG_STATUS, RWO16 STATUS ); ! 0'140000'. 0'044000" 
2 ELSE 
3 BEGIN 
3 CHK_RIXI_STATUS ( ZERO ); 
5 CHK"CSR STATUS ( CSR_STATUS, CSR_MASK ); ' 0'100220', 0'100220° 
3 CHKTRCVSTATUS ( RFLG_STATUS, RWD13.STATUS ); ! 0'140000'. 0'000000" 
° 
2 
2 CHK_XMIT_STATUS ( XFLG _STATUS, XWD12_STATUS ); ! 0'140000', 0'000400' 
2 COMPARE _PACKETS ( 
: -IOP_TABLE [{ CSR ? = DISABLE; 
1 END; 
-SBTTL _XMIT.ILOOP.PACKET GLOBAL ROUTINE - XMIT_ILOOP_PACKET ( P3 ) 
004737 001206 XMIT . ILOOP . PACKET: 
JSR PC.CLR.DESCR ; 2687 


——— = 


: Routine Size: 
; Meximum steck 


- + ———— = —— =e 


CZQNADO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - XMIT_ILOOP_PACKET ( P3 ) 


000016G 
000001 


63 words . 
depth per invocation: 


Routine Base: 





C6 


14-Mar-1985 13:18:55 
14-Mar-1985 13:06:01 


XBUF .LENGTH, -( SP) 
#-60000, -CSP) 
PC,SET.RDESCR.LIST 
XBUF .LENGTH, (SP) 
#-60000, -(SP) 

PC ,SET.XDESCR.LIST 


. PC, XMIT.AND.RCV.PACKET 


#1,3I0P. TABLE+16 
10(SP),#1 

1$ 

#1,(SP) 

PC,CHK .RIXI.STATUS 
#-77560, (SP) 
(SP),-CSP) 
fg laa 


(SP) 

PC ,CHK .RIXI.STATUS 
#-77560, (SP) 
(SP),-(CSP) 
PC,CHK.CSR.STATUS 
#-40000 , (SP) 


-(SP) 
PC,CHK .RCV.STATUS 
#-40000, (SP) 

#400, -CSP) 

PC, CHK .XMIT.STATUS 
PC, COMPARE . PACKETS 
@IOP . TABLE +16 
#14,SP 

PC 


ACSCODE$ + 5656 


ome rs ww 


SEQ 0274 
VAX-11 Bliss-16 V4.1-582 Page 54 
DISK $USER2: [MARSHALL .DEQNA)ZQNA4.BL1;4 (26) 
3 2689 
; 2690 
3 2692 
; 2694 
; P3,* 2696 
; 2699 
3 2700 
; 2701 
: 2705 
; 2706 
; 2707 
; 2710 
. 2711 
; 2712 
; 2685 
; 2669 


ee 
<< eee | — 


FDO 9101010 10 10 be ee ee ee ee ee ee be be 





: Routine Size: 
; Meximum steck 


D6 


14-Mar-1985 13:18:55 


CZQ@NADO DEQGNA FUNCTIONAL TEST 
14-Mar-1985 13:06:01 


GLOBAL ROUTINE - TURN_OFF_LED ( P1) _ 
SSBTTL ‘GLOBAL ROUTINE - TURN_OFF_LED ( P1 )’ 
GLOBAL ROUTINE TURN_OFF_LED ( P1 ) : NOVALUE = 


o 
> 


GLOBAL ROUTINE : TURN_OFF _LED 
DESCRIPTION: 

This routine 
INPUT PARAMETERS: 


Pi - 


BEGIN 
PREP_FOR_SETUP ( ); 


INCR INDEX1 FROM 1 TO 14 DO 
WRT_STATION_ADR ( .INDEX1, PHA_INDEX ); 


XMIT_SETUP_PACKET ( .P1 ); 


END; 
-SBTTL TURN.OFF.LED GLOBAL ROUTINE - TURN_OFF_LED ( Pi ) 
TURN.OFF .LED:: 
MOV R1,-CSP) 
004314’ JSR PC PREP .FOR.SETUP 
000001 MOV #1,R1 
1$: MOV R1,-CSP) 
000023 MOV $23 ,-(CSP) 
004122' JSR PC,WRT.STATION. ADR 
CMP (SP)+, (SP )+ 
INC Ri 
000016 CMP R1,#16 
BLE i$ 
000004 MOV 4(SP),-CSP) 
005046 ' JSR PC, XMIT. SETUP .PACKET 
TST (SP )+ 
MOV (SP)-, Ri 
RTS PC 
22 words, Routine Base: ACS$CODE$ + 6054 


depth per invocation: 4 words 





VAX-11 Bliss-16 V4.1-582 


- —_— —_——_ — 


SEQ 0275 =| 
P 55 


DISK $USER2: [MARSHALL . DEQNA JZQNA4. BLI;4” (27) 


*, INDEX1 
INDEX1, * 


INDEX1 


INDEX1,# 


Pi,* 


2719 
2737 
2739 
2740 


2739 


2742 


2735 
2719 


re rte ee ee ee 


E6 


; 


CZQNADO DEQGNA FUNCTIONAL TEST 14-Mar-1985 13:18:55 
vo1.0 GLOBAL ROUTINE - TURN_OFF_LED ( Pi ) 14-Mar-1985 13:06:01 
3 2746 1 
; 2747 i 
$ 2748 1 
: 2749 O ELUDOM 
; OTS external references 


. GLOBL $SAVES, $SAVE2 


: PSECT SUMMARY 

$ 

$ Psect Neme Words Attributes 

; AC SCODE $ 1580 RO. I , LCL, REL, CON 


Library Statistics 


cmeccces Symbols -------- Pages 
File Totel Loaded Percent Mapped 


DISK $USER2 : (MARSHALL . DEQNA JQNALIB.L16;15 


223 133 59 14 


; COMMAND QUALIFIERS 

; BLISS/PDP11 ZQNA4 .BLI/LIST=ZQNA4 .LIS/OBJECT=ZQNA4 . OBJ/SOURCE=PAGE : 53 
Size: 1580 code + 0 date words 
Elepsed time: 03:40.0 
al 25672 


ert Used: 235 pages 
Compilation Complete 


FE 
< 
$92." 
3 
: 


—_——— << <a 
a . 





VAX-11 Bliss-16 V4.1-582 


DISK $USER2: 


Processing 
Time 


00:00.1 


_—— eee ——_—_ -— 


~~ - 
: (MARSHALL . DEQNA )ZQNA4. BL1;4. (27) 


; 
a 


rrr eer OOOO 0OO 
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CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:22:42 VAX-11 Bliss-16 V4.1-582 oo 1 
14-Mar-1985 13:07:52 DISK$USER2: (MARSHALL .DEQNAJZQNAS.BLI;4 (1) 


MODULE ZQNAS (TITLE ‘CZQNADO DEQNA FUNCTIONAL TEST’ 
IDENT = ‘VO1.0', 
ADDRESSING_MODEC ABSOLUTE ) 


j= 
SSBTTL ‘LAST ADDRESS AND SETUP SECTION’ 


a EE ES — 


BEGIN 
REQUIRE ‘BLSMAC.REQ’ ; ! DIAGNOSTIC SUPERVISOR LIBRARY 
! <BLF /NOF ORMAT > 


LIBRARY ‘QNALIB’ ; ! QNALIB LIBRARY 


ZQNA5S CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:22:42 VAX-11 Bliss-16 V4.1-582 age 
v01.0 LAST ADDRESS AND SETUP SECTION 14-Mar-1985 13:07:52 DISK $USER2 : [MARSHALL .DEQNAJZQNAS.BLI;4 
$ 1502 2 LASTAD 
; 1503 2 BGNSETUPC 1); ! NUMBER OF P-TABLES 
; P 1504 2 BGNPTAB 
; P 1505 2 %0'174440' ,#0' 700' 
? 1506 2 ENDPTAB 
| 1507 1 ENDSETUP 
-TITLE ZQNAS CZQNADO DEQNA FUNCTIONAL TEST 
-IDENT /V01.0/ 
-ENABL AMA 
000000 .PSECT $xXYZ$, RO 
000000 000014’ BLS$LAS::.WORD TSFREE 
000002 9000000C . WORD <<T$FREE-<BL$LAS+4>>/2> 
000004 000000 P.AAA: .WORD 0O 
000006 000002 .WORD 2 ; Plit count word 
000010 174440 P.AAB: .WORD -3340 
000012 000700 . WORD 700 
000014 000000 TS$FREE::.WORD O 
000004 ' L$LAST== BLS$LAS+4 
000001 TS$PTHV== i 
000004 ' $$LASi= P.AAA 
000010' $REM2= P.AAB 
-SBTTL $END.LINK LAST ADDRESS AND SETUP SECTION 
000000 000207 $END.LINK:: 
RTS PC ; 
t Routine Size: 1 word, Routine Base: *$XYZ$ + 0016 
; Meximum steck depth per invocation: O words 
; 1508 
; i509 1 END 
: 1510 0O ELUDOM 
$ PSECT SUMMARY 
: 
3 Psect Name Words Attributes 
: $xYZ$ 8 RO, I ,. LCL, REL. CON 





G6 


Library Statistics 


2 
(2) 


1499 


- -~ . - ee ee ee ee 





— 
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SEQ 0279 
| sonas CZQNADO DEQNA FUNCTIONAL TEST 14-Mar-1985 13:22:42 VAX-11 Bliss-16 V4.1-582 Page 3! 
vo1.C LAST ADDRESS AND SETUP SECTION 14-Mar-1985 13:07:52 DISK$USER2: (MARSHALL .DEQNA)ZQNAS.BLI;4 (2) 
ae ee eee le ne Symbols -------- Pages Processing 

; File Totel Loaded Percent Mapped Time 

; 

; DOISKSUSER2: [MARSHALL .DEQNA)JQNALIB.L16;15 

; 223 3 1 14 00:00.1 | 
$ COMMAND QUALIFIERS 

; BLISS/PDP11 ZQNAS.BLI/LIST=ZQNAS.LIS/OBJECT=ZQNAS.OBU/SOURCE=PAGE : 53 


Size: 1 code + 7 data words 
Run Time: 00:06.2 

Elepsed Time: 00:16.5 

Lines/CPU Min: 14707 
Lexemes/CPU-Min: 78262 

Pin | Used: 98 pages 

Compilation Complete 


. LL 


CF FrFrFrEEEEErFrOCOCOrPrPEFrPOOOCOORKRHKOOOCOOOOO 





16 


14-Mar-1985 13:08:53 VYAX-11 Bliss-16 V4.1-582 Page 1) 
12-Mar-1985 13:43:16 | [MARSHALL .DEQNAJQNALIB.R16;6 (1) 


‘ 
! DEFINE DATA STRUCTURES IN THIS SECTION 
Sim 


| 
; 
STRUCTURE ! DEFINE ACCESS ALGORITHM | 
REG_STR ( 0, P, S, E J= 
BEGIN 
LOCAL TMP_LOCATION; 
TMP_LOCATION = .CREG_STR + SUPVAL * 0) <0,#BPVAL,O>; 
! 


TMP _LOCATION 
END < P, S, E >; 


STRUCTURE ! DEFINE ACCESS ALGORITHM 
ADR_STR { O, P, S, E J= 
BEGIN 


LOCAL TMP_LOCATION; 
TMP_LOCATION = CADR_STR + SUPVAL * 0) <0O,#BPVAL,O>; 
TMP _LOCATION 

END < P, S, E >; 


STRUCTURE ! DEFINE ACCESS ALGORITHM 


LeLOCK { 0. P, S, E. I j= 
BEGIN 
CASE I FROM O TO 2 OF 
SET 


0]: 
fas € LBLOCK + O * SUPVAL ); 


"€ .LBLOCK + O * SUPVAL ); 
{2 ]: 


"( .LBLOCK + 0 * SUPVAL ); 
TES; 
END < P, S, E >; 





SEQ 0281 
14-Mar-1985 13:08:53  VAX-11 Bliss-16 V4.1-582 Page 2! 
12-Mar-1985 13:43:16 (MARSHALL . DEQNA JQNALIB.R16;6 (2) | 


See 
’ 


* MACRO DEFINITIONS 
4 

= 

MACRO 


TST_BIT € ADDR, EXPECTED ) = 
€ IF € .ADDR AND EXPECTED ) EQLU EXPECTED 
THEN 


geeee 


LSE 
FALSE )s, 


z= 
SS 
Ro 


ie OFFSET, POSITION, IMAGE ) = 
| -REG_ADR + SUPVAL * OFFSET )< sFIELDEXPAND ( POSITION ) > = IMAGE; 


ae ena ( OFFSET, POSITION, IMAGE ) = 
— + OFFSET )< #SFIELDEXPAND ( POSITION ) > = IMAGE; 


See 
0 
! THIS MACRO GETS BITS SPECIFIED BY THE FIELD NAME ” POSITION " 
! AND MEMORY LOC SPECIFIED BY (.REG_ADR + SUPVAL « OFFSET) 

é 

See 


GET_BIT € OFFSET, POSITION ) = 
-REG_ADR ([ OFFSET, POSITION J] #; 


ui 
ui 
edad ed tt lol lolol lolol -lol-l-l-1-1-1-1-1-1 7-1-7 


aaa bh dt tt - 1-1-1 1-1-1 -1-1-1-1-1-1-1-1-1-1-4-1 4-4 


a ere rrr ee ee ae 


SE 
14-Mar-1985 13:08:53 VAX-11 Bliss-16 V4.1-582 as I 
12-Mar-1985 13:43:16 (MARSHALL . DEQNA JQNALIB .R16;6 (3) 


PROGRAM LITERALS 


M4_DELAY 
MS_DELAY 


K 
TIME1_LIMIT 


TIMES_LIMIT 
TIMES_LIMIT 


I0P_VEC 


= 0, ¢ 

z Re 8 

= 0, ] 

= - i] 

= 0, ] 

= | t 

= 0, 4 

= $ 

= ji, ‘ 

= ) 6 

= 0, t 

= 0, 3 

= » ae a 

= 10000, 

= 10, $ 

s 20, 4 

= 30, i 

= 40, 

= 50, ’ 

= 1024, : 

= 128, ! DELAY - LOOP ITERATION COUNT 
=i K, ! DELAY - LOOP ITERATION COUNT 
=i1+#K, ! DELAY - LOOP ITERATION COUNT 

= 512, ! DELAY - LOOP ITERATION COUNT 

= 16 * K, ! DELAY - 16K LOOP ITERATION COUNT 
= 1, ! DELAY - LOOP ITERATION COUNT 

= 10, ! DELAY - LOOP ITERATION COUNT 

= 50, ! DELAY - LOOP ITERATION COUNT 

= 100, ! DELAY - LOOP ITERATION COUNT 

= 2, 

= 2. $ 

= 3, f 

= 4, é 

= 5. t 

= e. 4 

>: 3, : 

= 60'16', ! I/0 PAGE REGISTER SIZE 
= 0, ! OFFSET TO DEVICE ADDRESS ) 
= 2, ! OFFSET TO DEVICE VECTOR ADDRESS 


nm — ee 


—_— —-- — 


a 


~—< -« ——— ee 





14-Mar-1985 13:08:53 
12-Mer-1985 13:43:16 


L6 


0 IOP _6RL = 4, ! OFFSET TO DEVICE BR LEVEL 
° INT _VEC = 6, : 
0 CSR ° 7, : 
: WORD_cIMIT = #0°177777', : 


VAX-11 Bliss-16 V4.1-582 
(MARSHALL . DEQNA JQNAL TB .R16;6 (3 


ee —— . — + 


—- = = © @ =e Ge 


eae ttt 1-1-1 1-1-1 -1-1-1-1-1-1-1-1-1-1-1-1-1 1-1-9 


DESCRIPTOR LIST DEFINITIONS 
D_FLAG_uD = 0, : 
D0_DESCAR_ BITS « 1, ! 
D_HI_ADR * i, : 
D_LO_ADR = 2, : 
D_WO_COUNT = 3, ' 
D_WOi_STATUS = 4, é 
D0_WO2_STATUS = 5, : 

D1_OF FSET = 18, ' 
D2_OF FSET = 36 ! 
1_SIZE = 120, 
DESCR_SIZE = 128, 
0_SIZE = DESCR_SIZE / 2. 
80_0_SIZE = 16, 
BuF _SI = 4096, 
68_SIZE = BUF _SIZE / 2, 
SETUB_SIZE = 256, 
BYTE_COUNT = - ( BUF_SIZE / 4 ), 

- SIZE 2 4096, 
CHSUM_OFFSET = 6, 
SA_RBL = £60'177775', 8 
PKT_LENGTH = 1500, ! 
MAX_LENGTH = 1534, ‘ 
LEGAL _LENGTH = 1514, : 
ILLEGAL_LENGTH = 1536, ' 
LPB_PKT = 60'0220', : 
PKT_ TYPE = 12, ' 
SKIP_CNT = 0, 
RFC = i, 
PKT_DATA = 15, 
SHORTEST _PACKET = 60, ; 
LONGEST_PACKET = 1514, : 
LSPL » 1514, ' 
PHA_INDEX = 19, ‘ 

g 

KB_VEC_LOC = #0’ 000060’ , ’ 
PF_VEC_LOC = £0'000024' , : 
CPU_LED = 60'177524', : 
KB_ADDR = #0' 177560 : 
KB_ENABLE = #0'0600100', ‘ 


M6 


14-Mer-1985 13:08:53 
12-Mer-1985 13:43:16 


VAX-11 Bliss-16 V4.1-582 
(MARSHALL . DEQNA JQNAL IB .R16;6 


STATUS WORD 0. FLAG WORD 


STATION ADR RCV BUF LENGTH - 3 wWOS 


PACKET LENGTH 
PACKET LENGTH 
LEGAL PACKET LENGTH 
ILLEGAL PACKET LENGTH 
LOOPBACK PACKET 
PACKET TYPE 

t 


t 
! SHORTEST SETUP PACKET LENGTH 


LONGEST SETUP PACKET LENGTH 


! LONGEST SETUP PACKET LENGTH 
! PHYSICAL ADDRESS INDEX IN THE 


TARGET_ADOR VECTOR 
INPUT CONSOLE TERMINAL VECTOR LOC 


! POWER FAIL VECTOR LOCATION 


TURN OFF CPU LED LIT ON DCOK 


* CONSOLE TERMINAL INPUT ADDRESS 
‘ ENABLE CONSOLE TERMINAL INPUT 


Ee Oe + ee AO ene ~~ ec 


ee —_- —- 


Eee ee 


aaah dd 1-1-1 1-1-1 -1-1-1-1-1-1-1-1-1-1-}-1-1-1-1-1-1-7 9 9 


TRANSMIT, 


CSR_STATUS 
CSR1_STATUS 
CSR2_STATUS 
CSR_MASK 
CSR1_MASK 
CSR2_MASK 
CSR3_MASK 


PATRNI 
PATRN2 


NXM_LO_ADR 
NXM_HI_ADR 


XFLG_STATUS 
XWO11_STATUS 
XxWO12_ STATUS 


XWD14_STATUS 
ee MASK 


RWO11_STATUS 
RWO12_STATUS 
RWD13_STATUS 
RWD14_STATUS 
RWD15_STATUS 
RWD16_STATUS 


RFLG_STATUS 


RHL _MASK 
RLL_MASK 


#0’ 160000 , 
#0'000077'. 
#0’ 140000' , 
#0'157760'. 
80'037777'. 


s0'1 


#0‘ 003400’, 
#0'000377', 


60 

#0‘ 100220' , 
#0'0103576' , 
#60'167777', 
#0'010000' , 


= £60'001411', 
= 60'001471', 


c= oe Cm OC tee tae Om (@ 6@ *e@ oe e@ 


-. —_— - -_—_— 


N6 


14-Mer-1985 13:08:53 
12-Mer-1985 13:43:16 


VAX-11 Bliss-16 V4.1-S62 
(MARSHALL . DEQNA JQNAL IB .R16;6 


RECEIVE AND CSR STATUS AND MASK WORD DEFINITIONS 


TRANSCEIVER POWER ( XC - BIT 12 ) 
TRANSCEIVER POWER ( XC - BIT 12 ) 


CSR STATIC BITS 
CSR STATIC BITS 


NXM ADDRESS - LOW ORDER BITS 
NXM ADDRESS - HIGH ORDER BITS 


TRANSMIT FLAG WORD MASK BITS 


EXPECTED TRANSMIT FLAG WORD 


EXPECTED TRANSMIT STATUS WD 1 

BIT 8 IS SET IN INTERNAL LOOOPBACK MODES 
BIT 8 IS RESET IN EXTERNAL LOOOPBACK MODES 
EXPECTED TRANSMIT STATUS WD 1 


RECEIVE FLAG WORD MASK BITS 

RECEIVE STATUS WD 1 MASK BITS 

RECEIVE STATUS WD 1 MASK BITS ! N.M. CHANGED FROM 174017 TO 174013 
RECEIVE STATUS WD 1 MASK BITS 

RECEIVE STATUS WD 1 MASK BITS 

EXPECTED RECEIVE STATUS 
EXPECTED RECEIVE STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 


EXPECTED RECEIVE FLAG WORD 


RCV HIGH ORDER LENGTH BITS 
RCV LOW ORDER LENGTH BITS 


Ee - - 





14-Mer-1985 13:08:53 VAX-11 Bliee-16 V4.1-582 wey 7 
12-Mer-1985 13:43:16 (MARSHALL . DEQNA JQNAL IB .R16;6 (6) 

; 0234 0 fee 

: 0235 0 : 

: = : : BUFFER DESCRIPTOR / CHAIN DESCRIPTOR BIT DEFINITIONS 

i _ 

$ 0238 °O $-- 

’ 0239 O 

: 0240 0 y = £0‘ 100000’, ! VALID ADDRESS IF i 

: 0241 O Cc = 60'040000' , ' CHAIN ADDRESS IF 1 

5 0242 0 Eg = £0'020000' , ! END OF MESSAGE IF i 

$ 0243 ; Ss = £0'010000' , ! SETUP MODE PACKET IF 1 

$ 0244 

$ 0245 0 NEWB = #0’ 100000’, ! BUFFER NOT USED IF i 

$ 0246 0 LASTD = £0’ 100000’ , ! LAST DESCRIPTOR IN CHAIN 

5 0247 9O VE = *120000' , ! 

$ 0248 O VL = £0' 100200’ , : 

3 0249 90 VH = #£0' 100100’, : 

: 0250 0 vc = £0‘ 140000’, : 

$ 0251 Oo VAHL = #60’ 100300’ , : 

$ 0252 0 VSE = £0’ 130000’, : 

8 0253 O VSEL = #£0' 130200’, : 

$ 0254 0 VENXM = £0’ 120077’, : 

$ 0255 0 

5 0256 90 XLRL_SET = @B'11', $ XMIT AND RCV LISTS INVALID 

$ 0257 °O ILEL_SET = 6B'11', ' INTERNAL AND EXTERNAL LOOPBACK BITS 

8 pot a : ILEL_CLR = £8'00', * INTERNAL AND EXTERNAL LOOPBACK BITS 

5 

3 0260 0O INT_LOOPBACK = #8'00', ! INTERNAL LOOPBACK 

$ 0261 O INX_LOOPBACK = #8'10', ! INTERNAL /EXTENDED LOOPBACK MODE 

$ ons : EXT_LOOPBACK = #B'i1', ! EXTERNAL LOOPBACK 

3 

’ 0264 0 N_MODE = 60'000200', § ENABLE NORMAL MODE OF OPERATION 

$ 0265 0 P_MODE = £0'000202’ , ! ENABLE PROMISCUOUS MODE OF OPERATION 

’ 0266 90 A_MODE = £60'000201', ' ENABLE ALL MULTICAST MODE OF OPERATION 

; 0267 O LED = 60'000204', ' TURN OFF LED 1 

5 0268 0O LED2 = £€0'0900210', ' TURN OFF LED 2 

$ poo 44 : LEDS = £0'000214', ' TURN OFF LED 3 

$ 


——_—— =F 


eceoceocooooooooooococococo 


=e 


14-Mer-1985 13:08:53 
12-Mar-1985 13:43:16 


tee 
! STATION ADDRESS CONSTANTS 
4 


SADR1 = O, ! HIGH STATION ADDRESS BITS 
SADR2 = 1, ! MIDDLE BITS 

SADR3 = 2, ! LOW STATION ADDRESS BITS 
CHSUM = 3, ! ACTUAL CHECKSUM INDEX 


h 
! HARDWARE AND SOFTWARE P-TABLE EQUATES 
3 


SWP_SIZE s 3, ! SOFTWARE P-TABLE SIZE ( WORDS ) 
HWP _SIZE = 2, ! HARDWARE P-TABLE SIZE ( WORDS ) 
SET_IT = 1 + 
CLR_IT = 0; 





SEQ 0287 , 
VAX-11 Bliss-16 V4.1-582 vous 8! 
(MARSHALL . DEQNA JQNALIB .R16;6 (7) 


ehh abd Dt) -1 1-1-1 -1-1-1-1-1-1-1-1-1-1-1-1-1-1-7-1-9 99 


FIE 


THE CONTROL 
L 

IOP_FIELOS = 
SET 
RE = 
SR = 
NI = 
BD = 
XL = 
RL = 
IE = 
xI = 
IL = 
EL = 
SE = 
X1 = 
xC = 
CA = 
X2 = 
RI = 
LB = 
XLRL = 
ALL_BITS= 
LO_NIBBLE 
HI_NIBBLE 
LO_BYTE 
HI_BYTE 
ST_ADDR 
ST_WORD 
RCV_LO = 
RCV_HI = 
XMIT_LO = 
XMIT_HI = 
VEC_ADR = 
VEC_ALL = 
CSR_ALL = 
TES; 


AND 


arn he De Dee De De | De 0 ee ee Dee | ee | oe | ee | ee | oe | 


rm rr ers ees 


> > ee he fe po 





D7 


14-Mer-1985 13:08:53 


12-Mar-1985 12:43:16 (MAR 


STATUS REGISTER BIT DEFINITIONS 


0. 1,0), ! RECEIVER ENABLE R/W € ACTIVE HIGH ) 
1, 1. 0], ! SOFTWARE RESET R/W € ACTIVE HIGH ) 
2,1, 0), ! NXM INTERRUPT R ( ACTIVE HIGH ) 
3. 1, 0), ! BOOT/DIAGNOSTIC ROM R/W € ACTIVE HIGH ) 
4, 1,0), ! XMIT LIST INVALID R ( ACTIVE HIGH ) 
5S, 1.0), ! RCV LIST INVALID R  ( ACTIVE HIGH ) 
6, 1, 0), ! INTERRUPT ENABLE R/W € ACTIVE HIGH ) 
7, 1, 0 J, ! XMIT INTERRUPT REQUEST R/W ( ACTIVE HIGH ) 
8, 1. 0], ! INTERNAL LOOPBACK MODE R/W ( ACTIVE LOW ) 
9, 1, 0), ! EXTERNAL LOOPBACK MODE R/W ( ACTIVE HIGH ) 
0, 1, 0), ! SANITY TIMER ENABLE R/W € ACTIVE HIGH ) 
1, 1.0), ! RESERVED, UNUSABLE 

2. 1, 0), ! TRANSCEIVER PWR R  ( ACTIVE HIGH ) 
3, 1, 0), ! CARRIER R  ( ACTIVE HIGH ) 
4, 1,0), ! RESERVED, UNUSABLE 

5S. 1.0), ! RCV INTERRUPT REQUEST R/W € ACTIVE HIGH ) 
8, 2.0], ' LOOPBACK B1TS 

4,2,0], ! XMIT AND RCV LISTS INVALID BITS 

0,16, 0 j, ! FETCH WHOLE WORD 

co oo, 6}. ! 

(0, 4,0], ! 

{o0, 8, 90] H 

{ 0, 16, 0 ) ! GET WORD, ALL BITS 

[oe 6, 03 ! STATION ADDRESS LOW BYTE 

{ 0, 16, 0 ) ! GET WORD, ALL BITS 

2, 0, 16, 0 }, ! RCV BUFFER DESCRIPTOR LIST LOW ADDRESS 
¥, 9, &, : ! RCV BUFFER DESCRIPTOR LIST HIGH ADDRESS 
4, 0, 16, 0 j, ! XMIT BUFFER DESCRIPTOR LIST LOW ADDRESS 
5. 0, 8, ‘ ! XMIT BUFFER DESCRIPTOR LIST HIGH ADDRESS 
2. 6, 6 1. ! INTERRUPT VECTOR ADDRESS 

6, 0, 16, 0 J, ! INTERRUPT VECTOR ADDRESS 

fi Ne ' CONTROL AND STATUS REGISTER 


VAX-11 Bliss-16 V4.1-582 
SHALL . DEQNA JQNALIB .R16;6 


—e— — rm ee eel -_——_——_—- — 


SEQ 0288 
Page S 
(8) 


-- 
OP PS SOO SOE OSS eee Se © OHO © OU SS © & Ge & & oe oe 


eae ddd dT 1 -l 1-1-1 -1-1-1-1-1-1-1-1-1-1-1-1-1-1-7-7-9 99 





ee ee ee ew 


E/ 


14-Mar-1985 13:08:53 VAX-11 Bliss-16 V4.1-582 Page 10! 
12-Mar-1985 13:43:16 (MARSHALL .DEQNAJQNALIB.R16;6 (9) 


fee 
‘ 


TRANSMIT AND RECEIVE DESCRIPTOR LIST FIELDS 


i 
FIEL | 
OL_FIELDS = 
SET 
FLGWOD =([{ 0, 0, 16, 0 ], ! XMIT OF RCV FLAG WORD 
DBITS ={[{ 1, 0, 16, 0 ], ! DESCRIPTOR BITS 
(gi 2 ae ee oe * ! XMIT BUFFER BEGINS ON BYTE BOUNDARY 
L.8rr *f{ 1. 7.3.90], ! XMIT BUFFER ENDS ON BYTE BOUNDARY 
o.Bit *{ i, i2. i, 0 ], ! SET-UP PACKET IF 1 
car 668 El UA. RS. A. 8 2p ! LAST DESCRIPTOR IN CHAIN ( END ) 
C.6IT =f[{ 1, 14, 1,90], ! DESCRIPTOR HAS CHAIN ADDRESS IF 1 
V.BIT ={[{ i. 15, 1. 90}, ! VALID ADDRESS IF 1 
LOADR ={[ 2, O, 16, 0), ! LOW 16 BITS OF XMIT OR RCV BUFFER ADDRESS 
TWOL ={ 3. 0, 16, 0}, ! XMIT OR RCV PACKET WORD LENGTH 
STWO1 = {[( 4, O, 16, 0 J, ! XMIT OR RCV STATUS WORD 1 
VF ={4,90,1, 0], ! FIFO BUFFER OVERFLOW 
ABORT =[({ 4 9, 1,90], g 
STE16 ={[{ 4, 10, 1, 0], ! SANITY TIMER ON AT POWER_UP 
NOCAR ={[{ 4, 11, 1, 0], ! NO CARRIER 
RUNT e{ 6, 23, 2. 0:1, ! RUNT PACKET IN FIFO 
ESETUP =[{ 4, 13, 1,0], ! CONTROL SET_UP OR LOOPBACK PACKET 
LONGP =[{ 4, 14,1, 0], ! LONG PACKET 
ERRSU =[( 4, 14, 1, 0], ! ERROR SUMMARY 
LSTD = { 4, 15, 1. 0 4], ! LAST DESCRIPTOR LIST IN CHAIN 
STtWwO2 -=[{ 5, 0, 16, 0 ], ! XMIT OR RCV STATUS WORD 2 
TOR =[({ 5, 0, 14, 0 j, : 
RBLL *«{5. 0, 8, 0}, ! RECEIVE BYTE LENGTH ( LOW 8 BITS ) 
BSTAT =f{[{ 7, 0, 16, 0 J, ! BUFFER STATE ! XMIT ODD/EVEN ! HIGH ORDER ADR 
B_LEN =[{ O, 8 OJ], : 
WLEN = ({ 0,16, 0 J : 





F7 


14-Mar-1985 13:08:53 
i2-Mer-1985 13:43:16 


See 
' 


HARDWARE P-TABLE FIELD DEFINITIONS 


FIELO 
HWP_FIELDS = 


! I/0 PAGE BASE ADDRESS 


! INTERRUPT VECTOR ADDRESS 
! BR LEVEL 


a 

' 

! SOFTWARE P-TABLE FIELD DEFINITIONS 
: 


ELD 
SWP_FIEILDS = 
SET 


ERR_CNT = [0,0,16,0) 
TES; 


! # OF ERRORS BEFORE DROPPING DEQNA 


°o 
3 
eoeoocooooocooccocooooooCcCoCCoCCCOD 


COMMAND QUALIFIERS 
BLISS/POP11 QNALIB.R16/LIST=QNALIB.LIS/LIBRARY=QNALIB .L16/SOURCE=PAGE : 53 


; Run Time: 00:03.5 
: Elepsed Time: 00:11.6 
: Lines/CPU Min: 7075 


; Lexemes/CPU-Min: 33815 
: Memory Used: 44 pages 
; Library Precompilation Complete 


VAX-11 Bliss-16 V4.1-582 
(MARSHAL 


——— ee ee 


-_— ome eee ss 


SEQ 0290 
L .DEQNA JQNALIB.R16;6 


Page 11! 
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ZQNADO.EXE;1 Memory ellocation map TKB M40.10 Page 1 
14-MAR-85 13:24 
Partition name : DUMMY 
Identification : V01.0 
Task : (202,34) 
Task attributes: -HD 
Totel address windows: 1. 
Task image size : 11264. words 
Task address limits: 002000 055713 
R-W disk blk limits: 000002 000055 000054 00044. 
*#* Root segment: ZQNA1 
R/W mem limits: 002000 055713 053714 22476. 
Disk blk limits: 000002 000055 000054 00044. 
Memory ellocation synopsis: 
Section Title Ident File 
$CODE$:CRO,I,LCL.REL,CON) 002000 000406 00262. 
002000 000242 00162. ZQNA1 V0O1.0 ZQNA1.0BJ;1 
002242 000144 00100. ZQNA2 V01.0 ZQNA2.0BU;1 
$GLOB$:CRW,D,LCL,REL,CON) 002406 012504 05444. 
002 012504 05444. ZQNA1 V0O1.0 ZQNA1.0BUJ;1 
$PLIT$:(RO,D,LCL,REL,CON) 015112 007036 03614. 
015112 007036 03614. ZQNA1 V01.0 ZQNA1.0BJ;1 
AA$COO:CRO,I,LCL,REL,CON) 024150 000370 00248. 
024150 000370 00248. ZQNA2 V01.0 ZQNA2.0BU;1 
AB$COD:CRO,I,LCL,REL,CON) 024540 022570 09592. 
024540 022570 09592. ZQNA3 V01.0 ZQNA3.0BU;1 
AC$COD:(RO,I,LCL,.PEL,CON) 047330 006130 03160. 
047330 006130 03160. ZQNA4 V01.0 ZQNA4.0BJ;1 
. BLK, :CRW,I,LCL,REL,CON) 055460 000000 00000. 
$xY¥Z$ :CRO,I,LCL,REL,CON) 055460 000234 00156. 
055460 000214 00140. CZQNAA 2.4 Bi6SAV .OBJ;1 
055674 000020 00016. ZQNAS V0O1.0 ZQNAS.O0BJ;1 
lobel symbols 
000020 IT1 000002 BIT&8 000400 COUNTE 015016-R ERRBLK 002204-R 
-PRO 014300-R BIT10 002000 BIT9 #001000 CSR.WO 015030-R ERRMSG 002202-R 
ITO 000001 IT1i1 004000 BLS$¢LAS 055674-R DATA.B 003006-R ERRNBR 002200-R 
IT0O 000001 BITi2 010000 BOE 00 QNA. 015014-R ERRORS 047330-R 
IT01 000002 BIT13 020000 BUF .LE 015026-R DESCR. 002406-R ERRTYP 002176-R 
IT02 000004 BIT14 040000 CHECKS 015024-R OFSTBL 002210-R ERR.CO 015040-R 
IT03 000010 BITiS 100000 CHK.CS 051176-R DOWN.C 015022-R ERR.FL 015036-R 
IT04 0900020 BIT2 000004 CHK.RC 051666-R DS$PCNT 002122-R ERR.NU 015034-R 
IT0S 000040 BITS 000010 CHK.RI 050612-R EF.CON 000036 ETH.ST 014054-R 
IT06 000100 BIT4 #000020 CHK.XM 051370-R EF.NEW 000035 EVL 000004 
IT07 BITS 000040 CLR.BU 050564-R EF.PWR 000034 E1$REP 047634-R 
IT08 000400 BIT6 000100 CLR.DE 050536-R EF.RES 000037 FORM.H 053726-R 
jBITO9 001000 BIT? 000200 COMPAR 052146-R EF.STA 000040 GET.AD 015004-R 








1 
002210-R 
014774-R 
010000 
000040 
020000 





ee ce eee ee —_—- 


SEQ 0291 


INTERR 015012-R 
IOP .DA 015002-R 
IOP.TA 014034-R 
ISR 100 


L$AUT 002070-R 
LSAUTO 024462-R 


; ——-<-—— eee - ~_! 
re ee ees ae NS TL Aut nSaamnnem seem; meters Sas om eSE SRR AS 


a ae lS 


ene ee oe ere 


-EXE;1 


L$LUN 002074-R 


002100-R — 


— i 


Memory ellocation map 
13:24 


14-MAR-85 


016512-R 


*** Task builder statistics: 


Totel work file references: 87112. 


Work file 


reads: 


Work file writes: 0O. 


Size of core pool: 23454. words (91. 


TKB M40.10 


016574-R 
016660-R 
016724-R 
017010-R 
017100-R 
017162-R 
017250-R 
017336-R 
017362-R 
017450-R 


021514-R 
021600-R 


pages ) 


Size of work file: 3328. words (13. eaana) 
Elapsed time:00:00:39 


- et A A LE LT A TT TELLS AE LITE, ae 





H7 


Page 2 


MSG45 


PRIOO 
PRIO1 


021702-R 
021760-R 


022650-R 
022714-R 
023026-R 


015112-R 
015142-R 
015172-R 
015234-R 
015276-R 
015340-R 


002230-R 


002226-R 
002222-R 
014776-R 
002220-R 
002224-R 
015106-R 
015110-R 


055710- R 
000001 


025202-R 
034634-R 
035170-R 
037024-R 
040262-R 
041544-R 


WALKIN 


$SAVES 


—_ 2) eee ee ee eee eee 


041774-R 


026616-R 

027664-R 
TS 030544 -R 
T6 031254-R 
17 033614-R 
T8 034052-R 
T9 034376-R 
UAM 


055512-R 
055532-R 


SEQ 0292 


-A 
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Z@NADO CREATED BY TKB ON 14-MAR-85 AT 13:24 PAGE 1 SEQ 0295 
GLOBAL CROSS REFERENCE CREF  vo2 
VALUE REFERENCES... 
20  ZQNAl # ZQNA2 
014300-R @ ZQNA1 ZQNA3 ZQNA4 
000001  ZQNA1 # ZQNA2 
000001 = ZQNA1  ZQNA2 
000002 + ZQNA1 «= ZQNA2 
000004 = ZQNAl 4 ZQNA2 
000010  ZQNAl # ZQNA2 
000020 # ZQNAl 9 ZQNA2 
® ZQNA1  ZQNA2 
000100 ZQNAl # ZQNA2 
000200 # ZQNA1 # ZQNA2 
® ZQNA1  ZQNA2 
001000 ZQNAl # ZQNA2 
2  @ZQNA1 # ZQNA2 
002000 # ZQNA1 # ZQNA2 
® ZQNA1  ZQNA2 
010000  @ ZQNAl # ZQNA2 
020000  # ZQNAl ¢@ ZQNA2 
040000  @ ZQNAl # ZQNA2 
100000 # ZQNA1 # ZQNA2 
000004 = ZGNAl # ZQNA2 
000010 # ZQNA1 # ZQNA2 
000020 # ZQNAl # ZQNA2 
000040 # ZQNA1 # ZQNA2 
000100  ZQNA1 # ZQNA2 
000200  ZQNA1 # ZQNA2 
0004 ® ZQNA1  ZQNA2 
i # ZQNA1  ZQNA2 
055674-R @ ZQNAS 
® ZQNAl ZQNA2 
015026-R # ZQNAI 
015024-R # ZQNA1 ZQNA3 ZQNA4 
051176-R  ZQNA3 # ZQNA4 
051666-R  ZQNA3  # ZQNA4 
050612-R  ZQNA3 @ ZQNA4 
051370-R  ZQNA3  @ ZQNA4 
050564-R  ZQNA3  # ZQNA4 
050536-R  ZQNA3  # ZQNA4 
052146-R  ZQNA3  @ ZQNA4 
015016-R # ZQNAI ZQNA3 ZQNA4 
015030-R # ZQNA1 ZQNA3 ZQNA4 
3006-R # ZQNAI ZQNA3 ZQNA4 
015014-R # ZQNA1 ZQNA3 ZQNA4 
002406-R @ ZQNAI ZQNA3 ZQNA4 
002210-R # ZQNA1 
015022-R @ ZQNAI ZQNA3 ZQNA4 
002122-R @ ZQNA1 
000036  # ZQNAl # ZQNA2 
0000385 9 ZQNA1 # ZQNA2 
000034 @ ZQNAl ¢@ ZQNA2 
000037 @ ZQNA1 # ZQNA2 
000040 @ ZQNAl # ZQNA2 


LL OC OC 


—_— 


ee mee 


ZQNADO 
GLOBAL 





CREATED BY TKB 


CROSS REFERENCE 
REFERENCES... 


VALUE 


00000 
002210-R 


Ss S933SS393 SS S$ FS SBSSSZS3333 SRVSsSSesose2Ssos 


ee 





ON 14-MAR-85 AT 13:24 


ZQNA4 
ZQNA4 
ZQNA4 


ZQNA3 


ZQNAS 


ZQNA2 
ZQNAS 
ZQNA3 


ZQNA3 


ZQNA4 


ZQNA4 


J/ 


PAGE 2 
CREF vO02 


ZQNA4 


ee ee ee es Cs iC; 


—_——cee ee ae os 


SEQ 0294 


_ eee ew 8 ee + 
ee 


| ZaNADO 
GLOBAL 
SYMBOL 
L$DVTY 


CREATED BY TKB 


CROSS REFERENCE 
REFERENCES... 


VALUE 


002242-R 
002052-R 


SSVSsVesesesesesesssesseses FS SSSEsessesssssess 3 SeVsesess SSS 


. ne eee ee 


ON 14-MAR-85 AT 13:24 


ZQNA2] 


ZQNA2 


ZQNA2 


# ZQNAS 


# ZQNA2 


ZQNA2] 





PAGE 3 
CREF 





voe2 


IK 7 


SEQ 0295 


| Z@NADO 


| 


CREATED BY TKB 


—- —— i 


| GLOBAL CROSS REFERENCE 
SYMBOL VALUE 
MSGOB 016326-R 
MSGO9  016420-R 
MSG10 016512-R 
MSG11  016574-R 
MSG12 016660-R 
MSG13  016724-R 
MSG14 017010-R 
MSG15  017100-R 
MSG16 017162-R 
MSG17 -:017250-R 
MSG18 017336-R 
MSG19  017362-R 
MSG20 017450-R 
MSG21  017540-R 
MSG22 017620-R 
MSG23.  017704-R 
MSG24 017762-R 
MSG25 020036-R 
MSG26 020100-R 
MSG27 020142-R 
MSG28 020204-R 
MSG29 020250-R 
MSG30  020276-R 
MSG31  020364-R 
MSG32 020450-R 
MSG33 020512-R 
MSG34 020566-R 
MSG35  020642-R 
MSG36 020740-R 
MSG37 021044-R 
MSG38 021136-R 
MSG39 021216-R 
MSG40 1302-R 
MSG41 021372-R 
MSG42 021434-R 
MSG43  021514-R 
MSG44 021600-R 
S  021702-R 
5 ©6021 760-R 
MSG47 022030-R 
SG48 022104-R 
9 022142-R 
SGSO  022200-R 
S651 2262-R 
SGS2  022314-R 
SGS3  022360-R 
SG54 022410-R 
SG5S 2460-R 
SGS6 022522-R 
SGS7  022560-R 
S58 022650-R 
SGS9 022714-R 


REFERENCES... 
# ZQNA1 ZQNA3 
® ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
® ZQMA1 ZQNA3 
® ZQNA1 ZQNA3 
® ZQNA1 ZQNA3 
® ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNAS 
® ZQNA1 ZQNA3S 
® ZQNA1 ZQNA3 
# ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
® ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNAS 
@ ZQNA1 ZQNA3 
@ ZQNAi ZQNA3 
@ ZQNA1 ZQNA3 
® ZQNA1 ZQNAS 
# ZQNAi ZQNA3 
® ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
® ZQNA1 ZQNA3 
@ ZQNA1 ZQNAS 
# ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNAI ZQNAS 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
® ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNAS 
® ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA2] 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
@ ZQNA1 ZQNA3 
® ZQNA1 ZQNAS 


———_———— ee 





ON 14-MAR-85 AT 13:24 


PAGE 4 
CREF 
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uF 


SEQ 0296 
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ZQNADO 
GLOBAL CROSS REFERENCE 


023026-R ® ZQNA1 


| 
| 





SEEGERS 






Hee: 


> b> be dae bee bee ee ee ad be be 





ess 


Seseeeeeseese ses 8292830 
NO 


ee 
b= bo ee 
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VALUE REFERENCES... 


ZQNAS 
ZQNA3S 





ZQNAS 


CREATED BY TKB ON 14-MAR-85 AT 13:24 


M7 


_——_——_— 


SEQ 0297 


ee a —2a2> 
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CREATED BY TKB ON 14-MAR-85 AT 13:24 PAGE 6 SEQ 0298 
CROSS REFERENCE CREF O02 
ZQNA4 
ZQNA4 
ZQNA3 ZQNAS 
ZQNA4 
ZQNA4 
ZQNA4 
ZQNA4 
ZQNA4 
ZQNA4 
ZQNA4 
ZQNA4 
ZQNA4 
ZQNA2 ZQNA3 ZQNA4 
ZQNA3 ZQNA4 
é ZQNA3 ZQNA4 
fs ZQNA3 ZQNA4 
o2 ZQNA3 ZQNA4 
ZQNA2 ZQNA3 ZQNA4 
02 ZQNA3 ZQNA4 
» ZQNA3 ZQNA4 
r ZQNA3 ZQNA4 
0 ZQNA3 ZQNA4 
0 ZQNA3 ZQNA4 
ZQNA3 = @«-ZQNA4 
® ZQNAS 
ZQNA1 @ ZQNAS 
025202-R § ZQNA1 # ZQNA3 
634-R ZQNA1 @ ZQNA3 
035170-R  ZQNAl # ZQNA3 
037024-R §§ ZQNA1 #@ ZQNA3 
0262-R § ZQNA1 @ ZQNA3 
1544-R  ZQNA1 4 ZQNA3 
041774-R  ZQNA1 @ ZQNA3 
044042-R ZQNA1 @ ZQNA3 
704-R § ZQNA1 # ZQNA3 
045222-R  ZQNA1 #@ ZQNA3 
045572-R ZQNA1 @ ZQNA3 
032-R ZQNA1 @ ZQNA3 
046272-R ZQNA1 # ZQNA3 
047314-R  ZQNA1 # ZQNA3 
026616-R § ZQNA1 #@ ZQNA3 
027664-R §§ ZQNA1 @ ZQNA3 
030544-R § ZQNA1 @ ZQNA3 
031254-R § ZQNA1 # ZQNA3 
033614-R § ZQNA1 @ ZQNA3 
034052-R § ZQNAl @ ZQNA3 
034376-R ZQNA1 @ ZQNA3 
® ZQNA1 9 ZQNA2 
015020-R @ ZQNAl ZQNA3 ZQNA4 


-_ - TC 
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ZQNADO CREATED BY TKB ON 14-MAR-85 AT 13:24 PAGE 7 
GLOBAL CROSS REFERENCE CREF v02 
REFERENCES... 
ZQNAS  ZGNA4 
@ CZQNAA ZQNAS 
ZQNAS @ ZQNA4 
ZQGNAS @ ZQNA4 
@ ZQNA1 ZQNAS ZQNA4 
@ ZQNA1 ZQNAS 
ZQNAS @ ZQNA4 
® ZQNA1 ZQNAS ZQNA4 
® ZQNA1 ZQNAS ZQNA4 
ZQNAS @ ZQNA4 
ZQGNAS @ ZQNA4 
-L 055712-R @ ZQNAS 
$SAVE2 -R @ CZQNAA ZQNAS ZQNA4 
VES 055474-R #@ CZQNAA ZQNAS3 ZQNA4 
$SAVE4 055512-R @ CZQNAA ZQNA2 ZQNA3 
7 055532-R # CZQNAA 





